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I. PROGRAM DESCRIPTION 


A data acquisition software prot^ram has been developed to 
operate in conduction with the automated control system of the 
2bkW PM EPS Breadboard Test facility. The program provides 
limited interactive control of the Breadboard Test while 
acquiring data and monitoring parameters, allowing unattended 
continuous operation. 

The Breadboard Test facility has two positions for operating 
separate configurations. A blocd< diagram of a typical test con- 
figuration is ahown in Fig. l. The main variable in each test 
setup is the high voltage battery. The initial test battery 
contains 112, J3 AH, NI-CD cells arranged in M modules of 28 
cells each. The second test battery oontains 88, bb AH, NI-CD 
cells arranged in M modules of 22 cells each. Current testing 
will be limited to using a 28 vdc load bus , but the capability 
for testing with a high voltage bus (HOv DC or higher) has been 
included in the facility and equipment design. 


A. CONTROL SOF TWARE 

The software was developed for a Vidar Data Acquisition 
System (DAS) Which contains a PDP-8E Processor with 12K words of 
core memory, 8K words of storage is directly programmable with 
the VIDAR developed assembly language (VIDAC) and the remaining 
4 k words are available for data storage. The DAS contains a 
clock, a 6 digit Integrating Digital Voltmeter (IDVM), a high 
speed 16 column printer, an ICMR magnetic tape recorder, 600 
channels of random scanning capacity, jOO independently 
addressable switch closures, and a teletype. All DAS components 
are integrated for computer control by software program control. 

The software is composed of VIDAC subroutines, 
subroutines developed in-house and the main system control 
program. The VIDAC subroutines, which are described in the VIDAR 
systems manual, are used for arithmetic and input/output data 
manipulations. The developed subroutines are used for specific 
task control. The main program performs overall control and all 
other functions necessary to achieve effective and reliable test 
operations. 

Effective and automatic operation is subdivided into three 
primary functions; data acquisition ;• automatic limit checking; 
and data recording. Details of each of the program features are 
tabulated below , 
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1 . Data acquisition: 

a. Acquires cell data via the IDVM, 

b. Acquires system data via the IDVM, 

c. Acquires system control status via the IDVM, 

2, Automatic limit checking: 

a. Tests incoming data for within limit status based on 
current status supplied by the system control signals. 

b. Closes contacts on interface panel of control system to 
initiate out-of-limit shutdowns, out-of-limit printouts 
and to acquire system orbit counts. 

3 , Data Recording 

a. Outputs to the teletype a summary of data at the end of 
each orbit and after BPRC limit is reached for capacity 
tests, (Fig. 2) 

b. Outputs to the printer out-of-limit errors with time 
and orbit count. (Fig, 3) 

c. Outputs to the printer a battery summary when the 

first cell reaches 1.0 volts during a capacity test, (Fig 

d. Outputs to the printer the current scan 
values of orbit data, cell voltages, or 
temperature data on demand. (Fig, 4) 

e. Outputs to the ICMR the scanned data for 
every 10 th orbit. 


B, OPERATOR CONTROL 

The options allowed for operator control while the program 
is running are limited to the following: 

1 , Directed program halt, (not to be confused with using the 
halt switch on the processor) , 

2, Print requests for an individual battery of orbit data, 
voltages , or temperatures , 

3 , Recording on the ICMP, of the scan data, ■ 

NOTE: Orbit data consists of items such as battery voltage, battery 

current, charger current etc. that are used to calculate system \ 

performance over a 1 orbit period, j 

A. A power failure or system shutdown must be cleared and the i 

program restarted only under the direction of the 2 bKW Breadboard 

lead engineer, as a properly sequenced startup is 
necessary to prevent possible equipment damage. 

B. Operator options are all accomplished using the processor 
front panel switches and are explained under the program operating 
details , 


The program functions discussed above are completely integrated 


in the program and were subdivided for discussion purposes only, 
II. CONTROL PROGRAM DETAILS 

A simplified flow diagram is shown in Fig, b* The program has 
two starting points. The first is an absolute start used for 
totally initializing the system. The second starting point is 
used to recover from a power failure and as a restart after an 
operator requested halt. 

The general operations of the program are to test the 
operator set switch options, get the control signals and set the 
appropriate program flags, test the control signals for scan 
start, and Set the program to scanning mode or to the flag test 
mode . 


In the scanning mode the program acquires the time, 
then scans both test positions (hereinafter called BATT 1 and BATT 2) 

III, CONTROL PROGRAM OPERATING PROCEDURE 

A • Loading and starting the program 

1 • Cli^aring memory ■_ba_nk s 0 and 1 

a. Set bit 7 = 1, Depress E XTD ADDR. LOAD 

b. Set switch' register to 7600, Depress LOAD AD DR. 

c. Depress CL EAR and CONT. (See NOTE 1) 

d. Set bits 7 and 11 = 1. Depress EXTD ADDR, LOAD 

e. Set sv'fitoh register to 7600, Depress LOAD ADDR, 

f. Depress CLEAR and CONT ,. (see NOTE 1) Banks 0 and 1 have 

effectively been "cleared”, 

NOTE I; proper operation of the program will be indicated by 
a momentary illumination of the RU N light. Failure for this to 
occur may necessitate reloading the executive programs. See 
section III, A, 4 for further details, 

2 • program tape 

a. Set bit 8 = 1, Depress E XTD ADDR, LOAD, 

b. Set switch register to 7777 ♦ Depress LOAD ADDR . 

c. Load tape JA P2/0 in high speed reader and" switch to RUN, 

d. Depress CL EA R and CON T. (Note 2) 

•e. When high speed reader halts, set bits 8 and 11 = 1, 
Depress EX TD ADDR. LOA D. 

f. Set switch register to 7777,"* Depress LOAD ADDR . 

g. Load tape JAP2/ 1 in high speed reader and switch to RUN, 

h. Depress CLEAR and CONT , 

i. When the high speed reader halts, set bit 8 and 10 = I, 

Depress EXTD ADDR, LOAD. 

j. Set switch register to 7777* Depress LOAD ADDR , 
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k. Load tape JAP 2/2A in high speed reader. 

l. , Depress Cl^sCf and CONT . ( see NOTE 2). The program is 

now loaded. Verify that all external devices are turned 
on and that the hardware clock exhibits the correct time, 

m. Set the program options as described in section IV for 
the current test conditions, 

NOTE 2: If the tape does not load on does not properly halt at the 
trailer code, see section HI. A.b for reloading the executive program. 

3 • Starting the pro gram 

a. Set bit 8 and 11 =1, depress EXTD A DPR LOAD . 

b. Set the switch register to 0266 Tthe starting 
address) and depress LOAl ^ APPR . 

0 . Set switch register bo 00007 

d. Turn TTY Manual/ Auto switch to manual and the 
power switch to line. 

e. Verify DDAS System Switches in the following 
positions: 

1, System sw "ON" 

2, Set clock to proper T.O.Y. 

a. Power switch "ON". 

b. Push Stop, 

c. Push reset, 

d. Set day, hours, min., and sec, using 
digit switch and set button. 

e. Period switch position nob critical 
mult, switch position not critical. 

f. Remote - local switch to local. 

g. Totalize - normal switch to normal . 

h. Press start switch when time concides with 
actual time, 

3, ICMR Power Switch (inside door) to off 

A, 663-06 coupler switch bo "ON"; selector 
switch to "Program Interrupt", 

b. 663-060 coupler power switch to "ON!'; 

"output select" switch to "print"-"reoord" 

6. 16 column print power switch "ON" and 
verify printer paper is loaded 

7 . 1 3693-1 contact closure unit switch to "ON" 

8 . 13693-2 contact closure unit switch to "ON" 


9* b>31 OHMS corivertef power switch "ON” 

10. b21C IDVM power switch "ON" 

a. "Rate” switch full GCW to "program". 

b. "Resolution" sw..tch to "program". 

Q. "Function" switch to "program". 

d, "Range" switch to "program". 

e. "XhVM Check" switch to "operate". 

11, 610 Scanner 


a. Turn power switch to "ON". 

b. First channel thumb wheel switches set to "000". 

c. Last channel thumb wheel switches set to "399” • 

d . "Mode" selector switch to "remote". 

e. Depress "clear" switch. 

f. Depress "reset" switch. 

12. 13693-3 contact closure unit switch to "ON" 

13, 663A ICMR 

a. Turn power switch to "ON". 

b. Load tape. 

c. Depress "LOAD FWD" switch. 

d. Wait for tape drive to halt and "READY" 
light to illuminate. 

f. Depress CLEAR and CONT . 

g. Verify that the program is operating, 

h. Turn TTY to "Auto" mode. 


4 • RestartlnK the p rogram 


To restart the program after a power fail HALT or 
a DBAS room temperature overtemp HALT: 

a. Reload bank 2 tape as described in par, III.A.i through 1, 

b. Start program as described in par. III. A, 3* 
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t) • Loading the exeouttve pro g ram. 

a. Set bit 8 anti 11 s 1, Depress EXTD A DDR. 

b. Deposit the listed instructions into the locations 
listed below. Instruction are deposited by setting 
the switch register bo the first address and depressing 
the LOAD ADDR switch. The instructions are then deposited 
by setting the switch register to the insbruction and 
depressing the PEP switch. 


c , 

d, 

e , 

f , 

8 • 

h . 

i , 
J * 

k, 

l , 


LOCATION 

INSTRUCTION 

77b6 

6014 

77b7 

6011 

7760 

b.3b7 

7761 

6016 

7762 

7106 

7763 

7006 

7764 

7b10 

776b 

b374 

7766 

7006 

7767 

6011 

7770 

b367 

7771 

6016 

7772 

7420 

7773 

3776 

7774 

3376 

777b 

b3b7 

tch register 

to 77b6, Depress Lj 


Load VIDAC BIN L QAP.ER TAP E (Vidac No. 000b) in 
high speed reader. 

Depress C LEAR and CONT , 

When high speed reader finishes, (Tape will not 
stop at trailer code) , Depress HALT, 

Turn off reader, then set to LOAD position, 

Set switch register bits 8 and 10 = 1. Depress 
EXTD ADDR LO AD. 

Set swrtciir register to 7777, Depress LOAD ADDR, 
Load VIDAC CORE WIP E tape (Vidac No, 0003) in 
high speed reader and switch to RUN, 

Depress CLEA R and CONT, 

Go to step III , A,T 


B* Switch Options 

The switch options allow operator control of the prograni. The 
switch option are monitored continuously and may be set at any 
time. The switches are located on the PDP-8E control panel and 
are labled 0 through 11, 




SWITCH NUMBER 


0 

1 

2 

3 

H 

b 

10 

11 


F UNCTION 

HaXfc 
BATT 1 
BATT 2 

Orbit data print 
Voltage data print 
Temperature data print 
Reoord BATT 2 on ICMR 
Record BATT 1 on ICMR 


NOTE: Switch 1 or 2 should be operated simultaneously with 

3 1 *1 or bt 


1 , Halt , switch 0 

The halt function is used to stop the operating program, 
bo allow program changes to accommodate changing TEST SET-UPS. 

NOTE: This switch will only function if the RUN/HOLD switch on the 

control panel is in the HOLD position 

Restart of the program is accomplished by setting bit 
B and 11 = 1 and depressing EXTD ADDR LOA D, then setting 
the switch register to 0331 and depressing* LOAD ADDR . Set 
the switch register bo 0000 and Depress CONT . The program 
should now be operating , 

2. BATT 1 , Switch 1 

This switch is used in conjunction with switches 

3 , 4 or 6 to initiate a print out of the selected data for 

battery position 1 , 

3. BATT 2, switch 2 

Has the same effect on Battery 2 position , 

4, Orbit data print , switch 3 . 

This switch, when used in conjunction with switch 
1 or 2 ( bub not both) , will initiate a printout of the 
orbit data taken for BATT, 1 or 2 during the next data scan, 

• NOTE: The switches should be cleared after printing starts to 
prevent continuous printing. 

b. Voltage data print, switch 4 , 

This switch, when used in conjunction with switches 
1 or 2 ( but nob both) , will initiate a printout of the 
cell and module voltages for the selected battery 


6 , 


position during the datn scan. (See note in 4 above) 
Temperature data print, switch b 



i: 

I ' 

V 

I 


This switch, when used in conjunction with switch ! 

1 or 2 (but not both), wili initiate a printout of the 
• module and chamber temperatures for the selected battery 

position during the next data scan* NOTE: (See note in 4 above), | 

IV, CONTROL PROGRAM OPTIONS 

1. The program will disregard out of limit conditions and 
calculatons when the battery is disconnected from the circuit 

using the DISCONNECT switch in the control pannel. f 

\ . 

2. The faulty channel storage locations listed below t 

provide a means of identifying those abnormal cells in a battery )| 

which are disregarded in limit testing without physically fl 

removing the cells from the battery. The numbers represented by 

»'ccc” are the cell no. In octal notation, [ 1 


BATTERY 1 BAT TERY 2 


BANK 1 
LOCATION 


BANK 2 
LOCATION 

I.D, 

0253 

ccc 

0260 

ccc 

0254 

ccc 

0261 

ccc 

0255 

ccc 

0262 

ccc 

0256 

ccc 

0263 

ccc 

0257 

ccc 

0264 

ccc 


\ 



\ 
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3. The number of cells In battery and the number of 
modules may be changed to reflert ^he proper battery assembly. 
The proper storage locations are identified below, The no, of 
cells and modules are deposited in octal notation . 

BATTERY 1 BATTERY 2 



BANK 1 


BANK 2 



LOCATION 

NO. 

LOCATION 

NO, 

NO. OF CELLS 

0226 

XXX 

0227 

XXX 

NO. OF MODULES 

0230 

mmm 

0231 

wmm 
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BANK 2 STORAGE ASSIGNMENTS 


DESCRIPTION LOCATION 

SCAN TIME 0201-0204 


CONVERSION FACTORS 


CF1 s 1b. 0 OaOI-OiOa — « 2047 5 AOOOf 0000 

GF2 = 4,0 — — — 0304-0306 203**5 0000; 0000 

CF3 s O.b — — — , — — 0307-0311 — 2004; 0000; 0000 

CF4 s 10.0 — 0312-0314 — 204b; 0000; 0000 

CFb = 40.0 — — 03 lb-0317 — 206b; 0000; 0000 

CF6 = bO.O 0320-0322 — 2066; 2000} 0000 

CF7 s l.b — — — — 0323-032b — 2016; 0000; 0000 

CF8 = 60.0 — — — — 0326-0330 — 2067; 4000; 0000 

CF9 = 2.b — — — 0331-0333 202b; OOOO; 0000 

CFIOs 0,2 — — — — 0334-0336 1766; 3146; 3146 

CF1'1=bOO.Q — — — 0337-0341 — 2117; 6400; 0000 

CF12= b.O —————— 03**2-0344 — - 203b; 0000; 0000 






TTY HEADINGS 

1st LINE — 0401-ObOb 

2nd LINE — - — — 0b07-06l4 

3rd LINE Q61b«0722 

(NOTE SEE APPENDIX B) 



APPENPIX A 

BANK 2 STORAGE ASSIGNMENTS 


DESCRIPTION LOCATION 

BATTER! 1 


• CELL SCAN STORAGE FOR HI 

HI BATTER! VOLT — 1001-100i - 

HI CELL PER BATTER! 1042-10UM *• 

BATTER! V AT HI CELL ™ 106M-1066 - 
AVE, CELL V AT HI 1067-1071 ^ 

HI CELL NO. IN BATTER! — — 110« - — — 



LOCATION 
BATTER! 2 


- i001-i00.-1 

- BOME-SOim . 

- 306«-a066 

- 3067 -a071 

- 31 0 « 
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BANK 2 STORAGE ASSIGNMENTS 


DESCRIPTION 


LOCATION LOCATION 

BATTERY 1 BATTERY 2 


* CELL SCAN STORAGE FOR LO 


LO BATTERY V. — — 1201-1203 — 

LO CELL V. PER BATTERY 1242-12411 — - 

BATTERY V. AT LO CELL 1264-1266 — 

AVE CELL V AT LO— — 1267-1271 — 

LO CELL NO, IN BATTERY 1304 — — 


3201-3203 

3242-3244 

3264-3266 

3267-3271 

3304 
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BANK 2 STORAGE ASSIGNMENTS 


DESCRIPTION 


LOCATION 
BATTERY 1 


» ORBIT DATA SCAN STORAGE 

V BATTERY (CHAN 000/200) — 2001-2003 — - 

I REG IN (CHAN I 78 / 37 B) — 200>1-2006 - — 

I REG OUT (CHAN 179/379) 2007-2011—- 

V REG OUT (CHAN 180/380) - — 20l2-20t« — 

V BUS (CHAN -18 1 / 381 ) 20 lb-20 17 --- 

I BPRC (CHAN 182 / 382 ) — — — — 2020-2022 --- 

I BATTERY (CHAN 183/383) — 2023-202b — - 

I SAS (CHAN I 8 II/ 38 II) — — — - 2026-2030 - — 

V EAS (CHAN I8b/38b) — 2031-2033 — 

I CHG OUT (CKAH ^ 20 3H -20 36 

» ORBIT DATA SUMMATION V • ul- 

A = (M179 X M180) ORBIT — 2037-2041 — 

B = (MI 8 I A M182) ORBIT — 20A2-20Ail — 

C = (MOOO X M178) ORBIT — 201tb-20l»7 - — 


D = (M183) NIGHT — - 2060-2062 — 

E = (Ml 83 X MOOO) NIGHT 2063-2066 — 

F = (M1S3) DAY — — - 2066-2060 — - 

G = (M183 X MOOO) DAY - — - 2061-2063 — 

H = (M18A X M186) DAY — 2064-2066 — - 

I = (M186 X MOOO) DAY — — 2067-2071 - — 

HI CHRG TEMP, (M137) ORBIT — 2072-207'l — - 

HI REG TEMP (M188) ORBIT 2076-2077 — 

HI BATTERY TEMP (MI89) ORBIT — 2100-2102 

DCH C DISC, COUNTER 2^ ’'3 

» ORBIT DATA TYPE STORAGE 

ORBIT NO,—— 210M-2106 --- 

SUNSET TIME 2106-2111 — 

DCH 2112 — 

PPG WHO A/60 — — — 2113-2116 — 

PPG EFF A/H — — -— 2116.2120 — - 

BATTERY TEMP — 2121-2123 - — 

BPRC WH B/60 — — — — 2124-2126 — 

BATTERY AHO D/60 — - 2127-2131 — - 

RF F/D — — — — — — 21 32-21 3it — 

BATTERY. WHO E/60 ————— 2136-21 37 — 

BATTERY EFF G/ E — 2140-2142 — - 

HI CELL V, ——-— 21A5-2146 — - 

HI CELL NO. — — — 2146 — - 

AVE HI CELL V 2147-2161 - — 

LO CELL V —————— ------- 2162-2164 — 

LO CELL NO, 2166 

A 4 


LOCATION 
BATTERY 2 


4001-4003 

4004-4006 

4007-4011 

4012-4014 

4016-4017 

4020-4022 

4023-4026 

4026-4030 

40 31 -40 3 

11034-40 36 

Il0 37-''U'P 
4042-4044 
4046-4047 

4060- 4062 

4063- 4^’'8 

4066- 40^ . 

4061- 4063 

4064- 4066 

4067- 4071 
4072-4074 
4076-4077 
til 00-4 102 
410 3 

H104-4106 
4106-411 1 
4112 

4113-4116 
4116-4120 
4121-4123 
4124-4126 
4127-4131 
4132-4134 
4136-4137 
in 1I0-4 142 
4143-4145 
4146 

4147-4161 

4162-4164 

4166 
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BANK 2 STORAGE ASSIGNMENTS 


AVE LO CELL V. - 

CHRGR. EFF 1/ H 

CHRGR TEMP 

REG EFF A/ C 

REG TEMP 

E-O-C TIME 

PET STO. - - - 

SUNSET TIME STO— — 


21b6-2l60 

2161-2163 

2164-2166 

2167-2171 

2172-2174 

2176-2200 

2201-2204 

2206-2210 


--- 4166-4160 

4161-4163 

4164-4166 

4167-4171 

4172-4174 

— _ 4176-4200 
--- 4201-4204 

— 4206-4210 


f 
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BANK a STORAGE ASSIGNMENTS 


DESCRIPTION 


* LIMITS 

BATTERY TEMP — 

BATTERY HI VOLT - — 
BATTERY LO VOLT — 

MOD LO VOLT 

CELL HI VOLT — ^ — 

CELL LO VOLT 

CELL CAPTST LO VOLT 
CELL RECON D LO VOLT 
ROOM TEMP — 

BATT FAULT LIMIT — 
TEMP ERROR — ^ 
TEMP HI ERROR — — 

TEMP LO ERROR 

CAPTST 1,0V L1M> — 



LOCATION 
BATTERY 1 


- {30,0) 

2401-2403 — - 

(30,0) 

116R.0) 

2404-2406 - — 

( V65,0) 

(123.0) 

2407-2411 — 

( 97.0) 

- (30.8) 

2412-2414 — 

(24.2) 

— (i.bb) 

2415-2417 — 

(1.55) 

- (0.05) 

2420-2422 — 

(0.05) 

— (0.05) 

2423-2425 — 

(0.05) 

— (0.0) 

2426-2430 — 

(0.0) 

- (30.0) 

2431-2433 

• (0.059 

(0,000) 

2434-2436 


(0.321) 

2437-2441 


(29.121) 

2442-2444 


— (1 .0) 

2445-2447 

(1.0) 


30 . 0 

2057 

6000; 

168.0 

2105 

2000; 

165.0 

2105 

1200; 

123.0 

2077 

5400; 

121.0 

2077 

4400; 

30.8 

2057 

03-14; 

24.2 

2056 

1463; 

1.5 

2016 

0000; 

1.0 

2014 

0000; 

.2 

1766 

3146; 

0.0 

0000 

0000; 

35.0 

2064 

3000; 

0,321 

1775 

1055; 

29, 12 1 

2057 

2173; 

97.0 

2076 

0400; 

1.56 

2016 

1463; 

0.05 

1746 

3146; 


0000 

0000 

0000 

0000 

0000 

631H 

1463 

0000 

0000 

3146 

0000 

0000 

034b 

7166 

0000 

1413 

3200 


LOCATION 
BATTERY 2 


4401-4403 
4404-4406 
4407-44 M 
4412-4414 
4416-4417 
4420-4422 
4423-4425 
4426-41130 

4431-4433 


4445-4447 
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LOCATION 

INSTRUCTION 

CHARACTER 

LOCATION 

INSTRUCTION 

CHARACTER 

401 

0302 

B 

444 

0327 

W 

402 

0301 

A 

44b 

0310 

H 

403 

0324 

T 

446 

0317 

0 

404 

0240 

sp 

447 

0240 

sp 

40b 

0240 

sp 

4b0 

0240 

sp 

406 

0317 

0 

4b1 

0320 

P 

407 

0322 

R 

4b2 

0320 

P 

410 

0302 

B 

4b3 

0307 

G 

411 

0311 

I 

llbU 

0240 

sp 

412 

0324 

T 

4bb 

030b 

E 

413 

0240 

sp 

4b6 

0306 

F 

414 

0240 

sp 

4b7 

03O6 

F 

41 b 

0240 

sp 

460 

0240 

sp 

41b 

0240 

s p 

4bl 

0240 

sp 

417 

0240 

sp 

462 

0302 

B 

420 

0323 

S 

4b 3 

0301 

A 

421 

032b 

V 

464 

0324 

T 

422 

0316 

N 

4bb 

0240 

sp 

423 

0323 

S 

466 

0324 

T 

424 

030b 

E 

467 

030b 

E 

42b 

0324 

T 

470 

0315 

M 

426 

0240 

s p 

471 

0320 

P 

427 

0240 

sp 

472 

0240 

sp 

430 

0240 

sp 

473 

0240 

sp 

431 

0240 

Sp 

474 

0302 

B 

432 

0240 

sp 

47b 

0320 

P 

433 

0304 

D 

476 

0257 

/ 

434 

0303 

C 

477 

0322 

R 

43b 

0310 

H 

bOO 

0303 

C 

436 

0240 

sp 

bOI 

0240 

sp 

437 

0240 

sp 

b02 

0327 

W 

440 

0320 

P 

b03 

0310 

H 

441 

0320 

P 

b04 

0240 

sp 

442 

0307 

G 

bOb 

0240 

sp 

443 

0340 

sp 

506 

0240 

sp 


B 1 
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LOCATION 

INSTRUCTION 

CHARACTER 

LOCATION 

INSTRUCTION 

b07 

0302 

B 

552 

0311 

510 

0301 

A 

553 

0240 

511 

0324 

T 

554 

0303 

512 

0240 

sp 

555 

0326 

513 

0301 

A 

556 

0255 

5U 

0310 

H 

557 

0255 

515 

0317 

0 

560 

0303 

516 

0240 

sp 

561 

0316 

517 

0240 

sp 

562 

0317 

520 

0240 

sp 

563 

0255 

521 

0322 

R - 

564 

0255 

522 

0306 

F 

565 

0301 

523 

0240 

sp 

56b 

0326 

524 

0240 

sp 

567 

0240 

525 

0240 

sp 

570 

0303 

526 

0240 

sp 

571 

0326 

527 

0302 

B 

572 

0240 

530 

0301 

A 

573 

0240 

531 

032^1 

T 

574 

031^^ 

532 

0240 

sp 

575 

0317 

533 

0327 

W 

576 

0240 

534 

0310 

H 

577 

0303 

535 

0317 

0 

600 

0326 

536 

0240 

sp 

601 

0255 

537 

0240 

sp 

602 

0255 

540 

0302 

B 

603 

0303 

541 

0301 

A 

604 

0316 

542 

0324 

T 

605 

0317 

543 

0240 

sp 

606 

0255 

544 

0305 

E 

607 

0255 

545 

0306 

F 

610 

0301 

546 

0306 

F 

61 1 

0326 

547 

0240 

sp 

612 

0240 

550 

0240 

sp 

613 

0303 

55 1 

0310 

H 

614 

0326 


CHARACTER 

I 
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APPEND. X B 


LOCATION 

instruction 

GHARACT 

616 

0303 

C 

616 

0310 

H 

617 

0307 

G 

620 

0240 

sp 

621 

0306 

E 

622 

0306 

F 

623 

0306 

F 

62H 

0240 

sp 

626 

0240 

sp 

626 

0303 

C 

627 

0310 

H 

630 

0307 

G 

631 

0240 

sp 

632 

0324 

T 

633 

O 3 O 6 

E 

63*1 

0316 

M 

636 

0302 

? 

636 

0240 

sp 

637 

02*10 

sp 

6*10 

0322 

R 

6*11 

0306 

B 

642 

0307 

G 

643 

024*1 

sp 

644 

0306 

E 

646 

0306 

F 

646 

O 3 O 6 

P 

64? 

0240 

sp 

660 

02*10 

sp 

661 

0322 

R 

662 

0306 

E 

663 

0307 

G 

664 

0240 

sp 

666 

0324 

T 

666 

0306 

E 

667 

0316 

M 


LOCATION INSTRUCTION CHARACTER 


b60 0^20 P 

6 b 1 02*10 sp 

662 02*10 sp 

6 b 3 02*10 sp 

66*1 02*10 sp 

bbb 02*10 sp 

666 02*10 sp 

667 02*10 sp 

670 02*10 sp 

671 02M0 sp 

672 02*10 sp 

673 02*'0 sp 

67*1 02*10 sp 

676 0306 E 

676 02*10 sp 

677 0317 0 

700 02HO sp 

701 0303 G 

702 02*10 sp 

703 032*1 T 

70*1 031 1 I 

706 0316 M 

706 0306 E 

707 02*10 sp 

710 02H0 sp 

711 02*10 sp 

712 02*10 sp 

713 02*10 sp 

71*1 02*10 sp 

716 02*10 sp 

716 02*10 sp 

717 02*10 sp 

720 02*10 sp 

721 02*10 sp 

722 02*10 sp 







APPENDIX C 


• BM 

• Assigned Storage 


FA; 

BSS 

1 

FB; 

BSS 

1 


IFF 

4 

CH: 

BSS 

1 

FU: 

BSS 

1 

RA; 

BSS 

1 


2 


SR: 

BSS 

1 


IFF 

iy 

TP; 

T1 


T1; 

BSS 

14 

TP; 

BSS 

1 

11; 

BSS 

1 

CA; 

0160 


CB; 

0130 


CC: 

4 


CD; 

4 



IFF 

4 

Hi: 

BSS 

1 

H2: 

BSS 

1 

H3; 

BSS 

1 

m: 

BSS 

1 

Cl ; 

BSS 

1 

C2; 

BSS 

1 

C3; 

BSS 

1 

C4: 

BSS 

1 

SF: 

BSS 

1 

PF; 

BSS 

1 


IFF 

3 

A: 

BSS 

3 

TO: 

BSS 

1 

DC: 

BSS 

1 

C; 

BSS 

1 


IFF 

13 

FP: 

FC 



BATT 1 Flags 
BATT 2 Flags 

IDVM/Scanner Setup 
Chan, No . 

Function (DC or OHMS) 

Range (lOOOmv, lOv, lOOv, lOOOv) 
Resolution (,01//) 

Switch Register Storage 

Type Indicator Storage 


"OK TO TYPE” Flag 

Auto Index Address Pointer 

No, Of Cells In BATT 1 (112) 

No. Of Cells In BATT 2 (88) 

No, Of Modules In BATT 1 
No. Of Modules In BATT 2 

Time And Data Temporary 
Storage 

Days Orbit No, Chan, No. 

Hours orbit No, Data Word ! 

Minutes Minutes Data Word 2 

Seconds Seconds Data Word 3 

II BATT Flags" Temporary Storage 
"BATT No," Temporary Storage 
"No, Of Cells" Temporary Storage 
"No, Of Modules" Temporary Storage 
"USE SUNSET TIME" Flag 
"PRINT" Flag 

Temporary Fit, Pt. Storage 
"CAPACITY TEST OVER" Flag 
Temporary Storage 
"First Chan No," Storage 


FC: 1111; 1111; 1111; 1111; 1111; 

1111 ; 1111 ; 1111 ; 1111 ; 1111 
TE: BSS 1 Temporary Storage 






■I I 


•START OF MAIN OPERATING PROGRAM 


EXT 

THERMO 


BNTP.X 

BM 


CALL 

0,\OP 

Initialize System 

NOP 



OLA 



CALL 

2, CLOSE 


PAR 

= 2 


JMS 

WA 


CALL 

2, CLOSE 


PAR 

=D12 


JMS 

WA 


CALL 

2, CLOSE 


PAR 

=D13 


JMS 

WA 


CALL 

2 r CLOSE 

Reset All 

PAR 

=D14 

Acknowledges Status 

JMS 

WA 

Signals 

CALL 

2, CLOSE 


PAR 

=D32 


JMS 

WA 

1 

CALL 

2, CLOSE 


PAR 

-D33 


JMS 

WA 


CALL 

2, CLOSE 


PAR 

=D3^ 


JMS 

WA 


CALL 

2, CLOSE 


PAR 

= 4 


JMS 

WA 


TAD 

FA 


AND 

= 1777 

Clean BATT Flags Of "1.0 VOLT. REACHED” 

DCA 

FA 

And "CAPTEST COMPLETE” Flags 

TAD 

FB 


AND 

= 1777 


DCA 

FB 


DCA 

TO 

Clear ”CAPTEST OVER” flag 

CLA 



LAS 


Load Switch Reg, Into Accum, 

DCA 

SR 

Store In "SB”' 

CALL 

2, CLOSE 

Reset Switch Closures 

PAR 

=0 


JMS 

WA 

Go Wait 

TAD 

FA 


AND 

=7077 

Clear "PRINT REQUESTS” 

DCA. 

FA 

From BATT 1 Flaji 

TAD 

FB 


AND 

=7077 

Clear "PRINT REQUESTS" 

DCA 

FB 

From BATT 2 Flags 

TAD 

SR 

Get "SR" 


C 2 


SNA 


Set? 

JMP 

B3 

No, Go Check For "HOLD” 

AND 

s2000 

Tes, Mask For BATT 2 

SNA 


BATT 2 Requesteci? 

JMP 

B2 

Yes, Go Merge Print Flags 

CLA 


For BATT 2 

SET-UP TO 

MERGE PRINT 


TAD 

SR 

Get "SR" 

AND 

= 0700 

Mask Out All But "PRINT REQUESTS" 

DC A 

Cl 

Store In "Cv" 

TAD 

FA 

Get BATT 1 Flags 

AND 

= 7077 

Mask Out Old "PRINT REQUESTS" 

TAD 

Cl 

Add In New "PRINT REQUESTS" 

DCA 

FA 

Redeposit BATT 1 Flags 

HOLD TEST 

SET-UP 

13; TAD 

=D399 

Load For Chan. 399 

DCA 

CH 

Set Up iDVM/Scanner 

TAD 

= 1 

. Control 

DCA 

FU 


TAD 

=4 


DCA 

RA 


CALL 

1,VIDAR 

Initialize Acquisition 

PAR 

CH 

TAD 

= 330 

Set Pointer 

DCA 

10 

For Fit. Pt. 2.b 

JMS 

D3 

Go Get It 

CALL 

1,\STO 

Store in'”" A" 

PAR 

A 


CALL 

0, VRSLT 

Get Data 

CLA 


Clear Accumalabor 

CALL 

1,\FSB 

Subtract 2.b 

PAR 

A 

TAD 

0020 

Get Sign Of Result 

SMA+CLA 

Is "HOLD" On ? 

JMP 


Yes Go "HOLD" Branch 

TAD 

SR 

Get Switch Reg, Storage 
Mask Out "HALT" Bit 

AND 

=3703 

DCA 

SR 

Redeposit 

SET-UP TO 

GET CONTROL 

INPORMATION 

TAD 

=D192 

Load For Chan 192 

DCA 

CH 

JMS 

FS 

Go Set Flags 

TAD 

FA 

Get BATT ~T Flag Storage 

AND 

=6700 

Mask Out Old "CONTROL" Flags 

TAD 

Cl 

Merge In New ''CONTROL" Flags 

DCA. 

FA 

Pedeposit Flag Word 

TAD 

=D392 

Load For Chan 392 

DCA 

CH 

JMS 

FS 

Go Set Flags 

TAD 

FB 

Get BATT'"! Flag Storage 



• c 3 


AND 

= 6700 

Mask Out Old ** Control” Flags 

TAD 

C1 

Mofgo In Naw "COnfcrol” Flags 

DCA 

FB 

Rudaposit 

TAD 

=D199 

Load For Chan 196 

DCA 

CH 


CALL 

1,VIDAR 

Initialize Acquisition 

PAR 

CH 


CALL 

O.VRSLT 

Get Data 

CLA 

CALL 

1,\FSB 

Subtract 2.6 

PAR 

A 


TAD 

0020 

Get Sign Of Result 

SMA+CLA 


is "SCAN START" On 

JMP 

SC 

Yes, Go Scanning Branch 

TAD 

FA 

No, Get BATT 1 Flags 

DCA 

Cl 

Store In "Gl" 

TAD 

CA 

Get "No. Of Cells" For BATT 

DCA 

C3 

Store In "CS" 

TAD 

= 1 

Load 1 For BATT 1 

DCA 

C2 

Store In "02" 

TAD 

= 1000 

Set Pointer For BATT 1 

DCA 

11 

Storage 

JMS 

FT 

Go FlaaJTest 
Get* BATT Flags 

TAD 

Cl 

DCA 

FA 

Store In BATT 1 Flags 

TAD 

FB 

Get BATT 2 Flags 

DCA 

Cl 

Store In "Cl" 

TAD 

CB 

Get No. Of Cells For BATT 2 

DCA 

C3 

Store In "C3" 

TAD 

=2 

Load 2 For BATT 2 

DCA 

C2 

Store In "G2" 

TAD 

= 3000 

Set Pointer For BATT 2 

DCA 

11 


JMS 

FT 

Go Fla K Test 

TAD 

Cl 

Get Flags 

DCA 

FB 

Deposit As BATT 2 Flags 

TAD 

TF 

Get "OK TO TYPE" Flag 

SNA+GLA 


Is It Set? 

JMP 

B1 

No, Return To Beginning 

TAD 

T1 

Yes, Get Next Type Indicator 

SZA^-CLA 


Typing Desired? 

JMP 

B7 

Yes , Go Type 

CLA 


No. 

DCA 

TF 

Clear "OK TO TYPE" Flag 

JMP 

B1 

Return To Beginning 

PRINT A 

LINE 


CALL 

1,TY 

Go Tvoe A Line 

PAR 

T1 


CLA 

DCA 

TF 

Clear "OK TO TYPE" Flag 

JMP 

B1 

Return To Beginning 


c u 




SET UP TO 

MERGE BATT : 

CLA 


TAD 

SR 

AND 

s0700 

DCA 

Cl 

TAD 

FB 

AND 

*7077 

TAD 

Cl 

DCA 

FB 

JMP 

B3 

SYSTEM ON 

HOLD OPTION 

: CALL 

0,\CK 

TAD 

SR 

SPA 


HLT 


TAD 

rtOOO 

DCA 

SR 

TAD 

SR 

AND 

= 0700 

SZA+CLA 

JMP 

SC 

TAD 

= 1 

DCA 

TF 

JMP 

Bb 


Get ’'Switch Reg*” StQl'agti 

Mask out AU But "PRINT REQUESTS" 

Deposit Results In Cl 

Get BATT 2 Flags 

Mask Out Previous "PRINT FLAGS" 

Merge "PRINT REQUESTS" 

Redeposit BATT 2 Flags 
Return To Main Program 

Wait For All Typing To Finish 
Get »SP" 

Halt Requested? 

Yes , Halt 

No, Add "HOLD" Flag 
Redeposit In Switch Reg Storage 
Reload Switch Reg. Storage 
Mask All But "PRINT REQUESTS" 
print Requested? 

Yes Go Scanning Branch 
No, Set "OK TO TYPE" Flag 

Return To Main Program 


•PROGRAM BRANCH TO SCAN DATA 


CALL 

2, CLOSE 

Acknowledge ”Soan SfcaFfc'* 

PAR 

s2 

JMS 

WA 

GO 

CLA 

TAD 

si 

Seti ”OK TO TYPE" Flag 

DCA 

TF 


JMS 

SS 

Go 

TAD 

sD192 

Set Up For BATT 1 

DCA 

CH 


JMS 

FS 

Go 

TAD 

FA 

AND 

s6700 

Clear Control Flags 

TAD 

Cl 

Add In New Control Flags 

DCA 

FA 

Rede posit Flags 
set up For BATT 2 

TAD 

sD392 

DCA 

CH 

JMS 

FS 

Go Se.t _lAlT_R,_FlaKS 

TAD 

FB 

AND 

s670Q 

Clear Control Flags 

TAD 

Cl 

Add In New Control Flags 

DCA 

FB 

Rudeposit Flags 

TAD 

FA 

Get BATT 1 Flags 

DCA 

Cl 

Store In "Cl" 

TAD 

si 

Load 1 For BATT 1 

DCA 

C2 

Store In "G2" 

TAD 

» 1 nnn 

-pw 1 ww w 

Set Pointer For BATT 1 

DCA 

11 


TAD 

Cl 

Get BATT Flags 

AND 

s0700 

Mask Out All But "PRINT REQUESTS" 

SZA+CLA 


Print Requested? 

JMS 

HD 

Yes . Go Print Header 

Set Starting Chan For BATT 1 

DCA 

17 

JMS 

OD 

Go Scan Orbit Data 

TAD 

FB 

Get BATT 2 Flags 

DCA 

Cl 

Store In "Cl" 

TAD 

s2 

Load 2 For BATT 2 

DCA 

C2 

Store In "C2" 

TAD 

siOOO 

Set Pointer For BATT 2 

DCA 

11 


TAD 

Cl 

Get Flags 

AND 

s0700 

Mask Out All But "PRINT REQUESTS" 

SZA+CLA 


Print Requested? 

JMS 

HD 

Yes, Go Print Header 

TAD 

sD200 

set Starting Chan, For BATT 2 

DCA 

17 

JMS* 

OD 

Go Scan Orbit Data 

TAD 

FA 

Get BATT 1 Flags 

DCA 

C1 

Store In "Cl" 

TAD 

s1 

Load 1 For BATT 1 

DCA 

C2 

Store In "C2" 


G 6 


■ 


TAD 

siooo 

Set Pointei' For BATT 1 

DCA 

11 


DCA 

17 

BATT 1 Starting Chan. 

TAD 

CA 

Get "No. Of Cells" 

DCA 

C3 

Store In "C3" 

TAD 

CC 

Get "No* Of Modules" 

DCA 

16 

Store In "16" 

TAD 

SR 

Get "SR" 

AND 

=0001 

Mask For ICMR 

SZA-fCLA 


ICMR Requested? 

JMS 

IT 

les. Go Record Orbit Data 

JMS 

VD 

Go Scan Voltage Data' ' ” 

JMS 

BF 

Go Te St Ba 1 1 e r V Fa u 1 1 

TAD 

Cl 

Get BATT Flags 

DCA 

FA 

Redeposit In BATT l Flags 

JMS 

TD 

Go Scan Temp Data For BATT 1 

TAD 

FB 

Get BATT 2 PFags 

DCA 

C1 

Store In "Cl" 

JMS 

IZ 

Go Test For ICMP EOF 

TAD 

=2 

Load 2”*For ’'BATT 2~ ' 

DCA 

C2 

Store In "C2" 

TAD 

= 3000 

Set Pointer For BATT 2 

DCA 

11 


TAD 

= D200 

Set S\ anting Chan. For Cell 
BATT 2 

DCA 

17 

TAD 

CB 

Get NO. Of Cells 

DCA 

G3 

Store In "C3" 

TAD 

CD 

Get No , Of Modules 

DCA 

16 

Store In " 16" 

TAD 

SR 

Get "SR" 

AND 

=0002 

Mask For ICMR 

SZA+CLA 


ICMR Requested? 

JMS 

IT 

Yes. Go Record On ICMR 

JMS 

VD 

Go Sc a n Vo 1 ta pce , Da ta 

JMS 

BF 

Go Test Battery. Fault 

TAD 

Cl 

aet’“BAfT Flags — 

DCA 

FE 

Redeposit In BATT 2 Flags 

JMS 

TD 

Go Scan Temp Data For BATT 2 

TAD 

=2 


DCA 

FU 

Set Range and Function 

TAD 

=b 

For Room Temp . 

DCA 

RA 


TAD 

=D170 

Set Scanner For Room Tempera 

DCA 

CH 


CALL 

1.VIDAR 

Initialize Acquisition 

PAR 

CH 


CALL 

OjVRSLT 

Get Data 

DCA 

HI 

Store Chan No. In "H1" 

CALL 

0,\T 

Change Sign Of Data 

JMS 

TX 

Go Verify Data Within Limits 

CALL 

1,INTL1 

ConVert Data To Deg^^ 


C 7 





AND 

THERMO 


CALL 

1,\STO 

Store Results In '•H2-H4« 

PAR 

H2 


TAD 


Set Auto Ind, To Room 

DCA 

10 

Temperature Limit 

JMS 

D3 

Go Get It 

CALL 

•IAFSB 

Subtract "Current Temperature 

PAR 

H2 


TAD 

0020 

Get Sign Of Results 

SPAtCLA 


Too Hi? 

JMS 

ER 

Yes Go Error Routine 

TAD 

SR 

No, Get Switch Reg, Storage 

AND 

=0100 

Mask All But Temperature Print 

SZA+CLA 


Print Requested? 

JMS 

PR 

Yes, Go Print 

JMS 

IS 

Go Test ICMfi Recuest 

JMS 

IZ 

Go Test For ICMR EOF 

JMP 

B6 

No, Return To Main "Program 

BF (Battery 

FFault Test) 

SUBROUTINE 

TO TEST FOR 

BATTERY FAULT CURRENT 

; BSS 

1 

Return Address 

TAD 

=D171 

Set Scanner To Fault Chan, 

TAD 

17 


DCA 

CH 


TAD 

= 4 

Set Range 

DCA 

RA 


CALL 

1,VIDAR 

Initiate Acquisition 

PAR 

CH 


GALL 

O.VRSLT 

Get Data 

DCA 

HI 

Store Ghann No, In ••HI" 

TAD 

0020 

Get Sign Of Data 

AND 

= 3777 

Take Absolute Value 

DCA 

0020 

Redeposit 

CALL 

1,\ST0 

Store Data. In '•H2-H4» 

PAR 

H2 


TAD 

=4430 

Set Pointer To Limit 

DCA 

10 


JMS 

D3 

Get It 

CALL 

1,\FSB 


PAR 

H2 

Subtract Data 

TAD 

0020 

Get Sign Of Results 

SPA+GLA 


Over Limit? 

JMS 

ER 

Yes, Go Error 

JMS 

IS 

Go ICMR Test 

JMP» 

BF 

Return 

SCUTINE TO 

TEST FOR AN] 

D WRITE EOF 

; BSS' 

1 

Return Address 

TAD 

SR 

Get "SR" 

AND 

C2 

Mask To BATT No , 

SNA+CLA 


Set? 

JMP» 

IZ 

No, Return 


C 8 






CM A 

CALL 

JMP« 


0,\IMR 

IZ 


Gomplemen'i Aooutn 
Write EOF Gap 
Return 











• RS (RESET) 

ROUTINE 

TO RESET ORBIT DATA STORAGE 

RS: BSS 

1 

Return Address 

TAD 

11 

Set Auto Index To 

DC A 

10 

Starting Address 

TAD 

= 1103 

Load 1102 

CIA 


Compliment 

DCA 

HI 

Store in ”H1” 

GAUL 

0,\CL 

Put Zeros In FPAG 

n; JMS 

U1 

Store Zero 

ISZ 

HI 

Last Storage? 

JMP 

RZ 

No, Do Again 

TAD 

= 1A03 

Set Pointer For A Hi Limit 

JMS 

IB 

Put It In FPAG 

TAD 

=00ilM 

Set Pointer For Low 

TAD 

I>1 

Value Storage 

DCA 

10 


TAD 

=-b 

Set Counter '‘HI” 

DCA 

H 1 

For -b 

JMS 

RL 

Oo Store In Lo Vfilue Storage 

TAD 

=0200 

Set Pointei^For~N^ 

TAD 

11 

Group 

DCA 

10 


TAD 

=-D12 

Set Counter HI 

DCA 

HI 

For -12 

JMS 

RL 

Go Store In Lo Value StoraRe 

JMP» 

RS 

Return 

lA: BSS 

1 


TAD 

11 


DCA 

10 

Move Data From 

JMS 

U3 

Bank 1 To Bank 2 

JMP« 

lA 


IB: BSS 

1 


TAD 

11 


DCA 

10 

Move Data From 

JMS 

Di 

Batik 2 To Bank 1 

JMP<‘ 

IB 


•SUB LOOP TO 

STORE HI 

VALUES 

RL: BSS 

1 

Return Address 

RB: JMS 

U3 

Store Limit 

ISZ 

HI 

Last Storage 

JMP 

RB 

No , Do Again 

JMP« 

RL 

Yes , Return 


c 10 


»FS (SET FLAGS) ROUTINE 


ROUTINE TO 

AQUIRE CONTROL DATA AND SET BATT. FLAGS 

‘S: 

BSS 

1 

Return Address 


CLA 




TAD 

= 1 

Set Function 


DC A 

FU 

To Volts. 


TAD 

= -7 

Set Counter ”C2” To -7 


DCA 

C2 



DCA 

Cl 

Zero ”CV* 


CALL 

1.VIDAR 

Initialize Acquisition 


PAR 

CH 


>A: 

ISZ 

CH 

Increment Chan. No. 


CALL 

O.VRSLT 



CLA 




CALL 

1,VIDAR 

Initialize Acquisition 


PAR 

CH 



CALL 

1,\FSB 

Subtract 2.b 


PAR 

A 



CLA4-CLL 




TAD 

0020 

Get Sign Of Results 


SMA+CLA 


Is Control Signal On 


STL 


Yes, Set Link 


TAD 

Cl 

Get Flag Word 


RAR 


Rotate Link 4 Accum Right i 


DCA 

Cl 

Redeposit In "Cl" 


ISZ 

C2 

Last Control Chan.? 


JMP 

SA 

No, Do Again 


TAD 

Cl 

Yes Get "Cl" 


RTR 


Rotate b Bits Right 


RTR 




RTR 




SZL 


Is Disconnnot On? 


TAD 


Y F' •' 


AND 

= 1077 

Mask Ou^. Print P on • * ni'. s 


DCA 

C1 

Redeposit Flags 


CALL 

0,VRSLT 

Clr. VPSLT Routine 


CALL 

0,\CL 

Clr. FPAC 


CLA 




JMP» 

FS 

Return 



C 11 


TIME) 

GET SCAN TIME AND PET 


2, CLOSE 
= 1 
WA 

1 ,HTIME 
HI 


Return Address 
Close "T.OvY." Switch 
Go Wait 

Get "T.O.Y." And Store 
In 


=0200 

10 

ST 

SF 

=0003 

SO 

=0001 

SN 

= 220^4 
10 
ST 
SF 

=0002 

SF 

SF 

= 0002 
SN 

2, CLOSE 

=D11 

WA 

1 ,HTIME 
HI 

= -D99 
H2 

SY 
H2 
= 1 
H2 
H2 

0,BNBCD 

=0017 

IF 

= 2200 
10 
ST 


Set Pointer To Store Time 

Go Sto re Time 

Get "SUNSET TIME" Flag 

Mask For BATT No, 

Is It Set 
No i Continue 
Yes, Mask For BATT 1 
BATT 1? 

Mo, Go DO BATT 2 
Set Pointer For 

"BATT 1 SSTIME" Sto , 
Go ^tore Time As SSTIME 
Get "SilMSEl TIME" Flag 
Mask All But BATT 2 No, 


BATT 2? 

Yes, Do BATT 2 
Close Switch For 

"BATT 1 P,E,T," 

Go Wai t 

Get "BATT 1 P,E.T," 

And Store In "H1-HM" 

Test Last Two Digits 
In Orbit Count For 99 
99? 

Yes , Go Adjust First Three 
Adjust For Current Orbit No, 


Get Last Two Digits 
Convert To BCD 
Mask All But Last Digit 
Zero? 

Yes, Go Set ICMR Flag 
Set Pointer For 

"BATT 1 P,E,T," Sto, 
Go Store P.E, T, 


C 12 


UHiGiNAL PAGE Ib 
OF POOR QUALITY 



GALL 

2, CLOSE 

Close Switch For 

PAR 

=Di1 

"BATT 2 P.E,T,'' 

JMS 

WA 

Go Wait 

CALL 

1 » HTIME 
Hi 

Get‘~’BATT 2 P.E.T*" 

PAR 

And Store In ••H1-H4", 

CLA 



TAD 

S-D99 

Test Last Two Digits 

TAD 

H2 

In Orbit Count For 99 

SMA^-CLA 


99? 

JMS 

SY 

Yes* Go Ad.iust First Three 

TAD 

H2 

Adjust For Current Orbit No. 

TAD 

= 1 

DCA 

H2 


TAD 

H2 

Get Last Two Orbit Count Digits 

CALL 

D,BNBCD 

Convert To BCD 

AND 

= 0017 

Mask To Last Digit 

SU-hClk 


Zero 

JMS 

IG 

Yes. Go Set ICMR Flas 

TAD 

= 4200 

Set Pointer For” 

DCA 

to 

"BATT ? P.B.T," Storage 

JMS 

ST 

Go Stova P.E.T, 

CLA 


DCA 

SF 

Clear "SUNSET TIME" Flag 

JMP»» 

SS 

Return 

SN: TAD 

=J120‘I 

Set Pointer For 

DCA 

10 

"BATT 2 SSTIME" Sto, 

JMS 

ST 

Go Store Time As SSTIME 

DCA 

SF 

Clear "SUNSET TIME" Flag 

JMP 

SU 

Continue 

•SUBROUTINE TO STORE TIME OR P,E,1\ 

ST: BSS 

1 

Return Address 

TAD 

HI 


DCA 

0020 

Load "HI -Hi" In FPAC 

TAD 

H2 

DCA 

0021 


TAD 

Hi 


DCA 

0022 


JMS 

Ui 

Store In Bank 2 

TAD 

"H4" 

Load »H4" In FPAC 

DCA 

0020 


JMS 

U1 

Store In Bank 2 

JMP» 

ST 

Return 

• SUBROUTINE 

TO OVERFLOW 

ORBIT COUNT 

SY: BSS 

1 

Return Address 

ISZ 

HI 

Add To First Three Digits 
Adjust Last Two Digits 

TAD 

=-1 ^ 

DCA 

H2 

JMP* 

SY 

Return 

» SUBROUTINE 

TO SET UP Bl 

m 1 ICMR RECORDING 

IF: BSS 

\ 

Return Address 

TAD 

Cl 

Get BATT Flags 


C 1-( 


= 1000 


AND 

SZA+CLA 
JMP» IF 

TAD SR 

AND =7702 

TAD =0001 

DCA SR 

JMP» IF 

» SUBROUTINE TO SET 
IG : BSS 1 

TAD G1 

AND =1000 

SZA+CLA 
JMP» IF 

TAD SR 

AND =7701 

TAD =0002 

DC A S R 

JMP* IG 


Mask For "HOLD” 

In HOLD? 
las, Return 
Get ”SP" 

Mask Out Old Flag 
Set Flag 
Redeposlt "SR" 
Return 

BATT 2 ICMR RECORDING 
Return Address 
Get BATT Flags 
Mask For "HOLD" 

In "HOLD"? 

Yes , Return 
Get "SR" 

Mask Out Old Flag 
Set Flag 
Redeposit "SR" 
Return 
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•PR (PRINT A LINE) 

•ROUTINE TO PRINT A LINE OF PATA (CHAN NO. AND VALUE) 


BSS 

1 

R^tujni Acidi'ess 

CLA 



TAD 

HI 

Load Chan No, 

CALL 

0, BN BCD 

Convarb To BCD 

CALL 

0,\PTP 

0,\CL 

Load First Print Call (CCC) 

CALL 

Clear FPAG 

CALL 

1,\FAD 

Put Results In FPAG 

PAR 

H2 


CALL 

0,FPBCD 

Convert To BCD 

TAD 

0020 

Get Sign V/ord 

SMA+CLA 


Sign Neg .? 

TAD 

=-1 

No, Add -1 

TAD 


Add Spaoing 

CALL 

0,\PTP 

Load Second Print Call ( . .+) 

TAD 

0020 

Get First Word 

RTL 


Rotate Into Position 

RTL 



AND 

=77 bO 

Mask Out Sign 

DCA 

DC 

Deposit Into Temporary Storage 

TAD 

0021 

Get 2nd Word 

RTR 



RTR 


Rotate Into position 

RTR 



RTR 



AND 

=0017 

Mask Out Bits 0-7 

TAD 

DC 

Add In 1st Word 

CALL 

0,\PIP 

Load Third print Call (xxx) 

TAD 

0021 

Get 2nd Word 

RTL 



RTL 


Rotate Into Position 

AND 

= 7760 

Mask Out Bits 3-11 

DCA 

DC 

Store In "DC" 

TAD 

0022 

Get 3rd Word 

RTR 



RTR 


Rotate Into Position 

RTR 



RTR 



AND 

=0017 

Mask Out All But Bits 3- 1 1 

TAD 

DC 

Add To "DC" 

CALL 

0,\PTP 

Load Fourth Print Call 

TAD 

0022 

Get 3rd Word 

AND 

=0377 

Mask Out Bits 0-3 

DCA 

DC 

Deposit In "DC" 

TAD* 

0020 

Add First Word 

AND 

=2000 

Mask All But Exponent Sign 

SZA^CLA 


Plus? 

TAD 

=0400 

Yes Add 1 

TAD 

=b400 

No , Add 1 1 

TAD 

DC 

Add Exponent Value 


CALL 

0,\PTP 

Load Firth 

Print 

Call 

TAD 

=bOOO 

Add Space 



CALL 

0,\PTP 

Load Sixth 

Print 

Call And 



Print 

Line 


CALL 

0,\CK 




JMP» 

PR 

Return 




•FT (FLAG TEST) 


•ROUTINE TO 

TEST BATT. 

FLAGS 

FT: BSS 

1 

Retui'n Address 

TAD 

G1 

Get BATT Flags 

AND 

=1000 

MAs.k All But "BATT DISCONNECTED 

SZA-fCLA 


Dldconneoted? 

JMP^ 

FT 

tes , Return 

TAD 

Cl 

Get Flags 

AND 

=0004 

Mask Out All But Capacity 
Test Flag 

SZA-*-CLA 


On? 

JMP 

CT 

Yes, Go Cap test Branch 

TAD 

C1 

Get Flags 

AND 

= 1777 

Mask Out "1,0v RCHD" And 
''BPRC ACKLDG” Flags 

DCA 

Cl 


TAD 

C1 

Restore Flags 

AND 

=0002 

Mask Out All But "ORBIT 
COMPLETE" FJ ag 

SZA-t-CLA 


On? 

JMP 

OL 

Yes, Go Orbit Complt. Branch 

TAD 

Cl 

No, Restore Flags 

AND 

=0001 

Mask Out All But "NIGHT 
COMPLETE" Flag 

SZA-fCLA 


On? 

JMP 

NC 

Yes, Go Night Complt . Branch 

TAD 

Cl 

Restore Flags 

AND 

= 1777 

Mask Out "BPRC ACKLDG" Flag 
and "1,0 V LIMIT REACHED" Flag 

DCA 

Cl 

Redeposit Flags 

TAD 

C2 

Get BATT No. 

TAD 

= -1 

Adjust 

CALL 

2,\MPY 

Multiply By 20 

PAR 

=D20 


TAD 

=D13 

Add 13 

DCA 

DC 

Store Results In "DC" 

CALL 

1 , CLOSE 

Close "BPRC Acknowledge" Switch 

PAR 

DC 

JMS 

WA 

Go Wait 

JMP* 

FT 

Return™ 

•SUBROUTINE i 

FOR CAPTIST 

FLAG SET 

CT: TAD 

TO 

Get "CAPTEST OVER" Flag 

SNA+CLA 


Set? 

JMP* 

FT 

No, Return 

TAD 

Cl 

Yes , Get Flags 

AND 

= 2000 

Mask All But "BPRC ACKLDG" 
Flag 

SZA+CLA 


Set? 

JMP* 

FT 

Yes , Return 

TAD 

C2 

No, Get BATT No, 

TAD 

= -1 

Adjust 



CALL 

2AMPY 

Mul*;iply By 20 


PAR 

=D20 



TAD 

sD 13 

Add 13 


DC A 

DC 

Store Results In ”DC" 


CALL 

1, CLOSE 

Close "DPRC Acknowledged” Switch 


PAR 

DC 



JMS 

WA 

Go Walt 


TAD 

Cl 



AND 

=i)777 

Mask out ”BPRC ACKLDG" 




Flag” 


TAD 

=2000 

Set ”BPRC ACKLDG'' Flag 


DCA 

Cl 

Redeposit Flags 


TAD 

= 0200 



DCA 

10 

Set Pointer 


JMS 

03 

Get 1st Part Of Scan Time 


TAD 

= 11 7H 

Set Pointer For "E.O.C.” Storage 


JMS 

I A 

Store It 


TAD 

=0203 

Set Pointer For Last 


DCA 

10 

Of Scan Time 


JMS 

D1 

Get It 


TAD 

= 1 177 

Set Pointer For Last Of 


TAD 

11 

"E.O.C," Storage 


DCA 

10 



JMS 

U1 

Store It 


DCA 

TO 

Clear"GAPTEST COMPLETE" Flag 


JMP 

OK 

Go Complete Branch 

»SUBR0UTINE ’ 

FOR ORBIT 

COMPLETE FLAG SET 

OL: 

TAD 

TP 

Get "TYPE" Pointer 


DCA 

HI 

Store In ”H1" 


TAD 

= -7 

Set "H2" To -7 


DCA 

H2 


OY: 

TAD» 

HI 

Get "Type" Indicator 


SNA+CLA 


Is It Set? 


JMP 

OX 

No, Try Next One 


TAD* 

HI 



AND 

= 0003 

Mask All But BATT No. 


CIA 


Compliment It 


TAD 

C2 

Add Current BATT No , 


SNA+CLA 


Same? 


JMP* 

FT 

Yes , Return 


ISZ 

HI 

Increment "HI" 


ISZ 

H2 

Increment "H2" 


JMP 

OY 

Try Next Indicator 

OX: 

TAD 

C2 

Get "BATf No. 


TAD 

SF 

Add To "SSTIME" Flag 


DCA 

SF 

Redeposit As "SSTIME" Flag 

OK: 

TAD 

C2 

Get BATT No, 


TAD 

=-1 

Adjust 


CALL 

2,\MPY 

Multiply By 20 


PAR 

=D20 



TAD 

=D12 

Add 12 
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DCA 

DC 

Store In ”DC' 


CALL 

1 , CLOSE 

Close "Orbit Complete Aokldg" 



Switch 


PAR 

DC 



JMS 

WA 

Go WhI h 


JMS 

AC 

Go Calculate Orbit Data 

iSET 

UP TYPE 

POINTERS 


OGj 

TAD 

C2 

Get BATT No, 


TAD 

sMOOO 

Set Bit 0 And BATT No. 


DCA 

CH 

Storage in CH 


TAD 

C2 

Get BATT No. 


TAD 

=2000 

Set Bit 1 And BATT No. 


DCA 

FU 

Storage In FU 


TAD 

C2 

Get BATT No, 


TAD 

= 1000 

Set Bit 2 And BATT No. 


DCA 

RA 

Dep, In RA. 

•STORE TYPE 

INDICATORS 



TAD 

TP 

Get "TYPE INDICATOR" Pointer 


DCA 

HI 

Storage In "HI" 


TAD 


Set "H2" To -7 


DCA 

H2 


OH: 

TAD^ 

HI 

Get "TYPE INDICATOR" 


SNA-fCLA 


Is It Loaded 


JMP 

01 

No, Go Fill It 


ISZ 

H2 

Yes, Last Type Ind.7 


SKP 


No, Skip Next Instruction 


JMP 

OJ 

Yes, Get Out Of Routine 


ISZ 

HI 

Incrmnt Type Ind, Address 


JMP 

OH 

And Go Again 

•FILL TYPE INDICATORS 


01: 

TAD 

CH 

Get 1st Type Ind 


DCA» 

HI 

Store In First Open Ind . 


ISZ 

HI 

Incrmnt Address 


TAD 

FU 

Get 2nd Type Ind. 


DCA» 

HI 

Sto. In 2nd Open Ind. 


ISZ 

HI 

Incrmnt Address 


TAD 

RA 

Get 3’*^d Type Ind. 


DCA» 

HI 

Sto In 3rd Open Ind , 

OJ: 

JMS 

RS 

Go Reset Storage 


JMP» 

FT 

Return 

•NIGHT COMPLETE ADKNOWLEDGE 

NC: 

TAD 

C2 

Get BATT No. 


TAD 

=-1 

Adjust 


CALL 

2,\MPY 

Multiply By 20 


PAR 

=D20 



TAD 

=D14 

Add 14 


DCA 

HI 

Store In HI 


CALL 

1 , CLOSE 

Close "Nght Complete Acknowledge 




Switch 


PAR 

HI 



JMS 

WA 

Go Wait 


•ADD NIGHT CALCULATIONS HERB IF ANT ARE REQUIRED 
JMP» FT Re»,urn 
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•ER (ERROR) 

•ROUTINE TO INITIATE SHUTDOWN DUE TO OUT OF LIMIT CONDITIONS 


BSS 

1 

Return Address 

TAD 

Cl 

Get Flags 

AND 

si 000 

Mask All But "BATT DISCONNECTED’* 

S2# A'fCLA 


Set? 

JMP^ 

ER 

yes, Return 

TAD 

C2 

Get BATT No. 

TAD 

S. 1 

Adjust 

CALL 

2,\MPT 

Multiply By b 

PAR 



TAD 

FP 

Add First "Faulty Chan," 
Storage 

DCA 

DC 

Deposit Address In "DC" 

TAD 

s-b 

Set Counter To «b 

DCk 

TE 


TAD* 

DC 

Get Faulty Chan, No, 

CIA 


Coinpliraent It 

TAD 

HI 

Add Current Charu No. 

SNA+CLA 


Agree? 

jMpt 

ER 

Yes, Skip Error Routine 

ISZ 

DC 

No, Increment Fauty Chan, 
Storage 

ISZ 

TE 

Last storage 

JMP 

SS 

No 1 Go Agiiin 

TAD 

17 

Yes , Get Starting Chan No , 

CIA 


Compliment It 

TAD 

Hi 

Add Current Chan, No. 

SNA+CLA 


Agree? 

JMP 

EV 

Yes, Go BATT Volt, Error 
Branch *” 

TAD 

sD170 

Sot Room Temperature Chan , No. 

CIA 


Corapliraent 

TAD 

HI 

Add Error Chan, No, 

SNA+CLA 


Agree 

JMP 

El 

Yes , Go Room Temperature Error 

TAD 

17 

p i C* U V U 

No, Get Starting Chan . No. 

TAD 

sDlia 

Add Last Cell volt. 

CIA 


Compliment It 

TAD 

HI 

Add Current Error Chan. 

SPA+CLA 


Cell Error 

JMP 

EW 

Yes 1 Go Cell Error .Branch 

."AD 

17 

No, Get Starting^CharTr^N^ 

TAD . 

sDlUO 

Add Last Mod, Volt, Chan .No, 

CIA 


Compliment 

TAD 

HI 

Add Error Chan. 

SPA+CLA 


Less? 

JMP 

EX 

Yes, Go Mod. Volt. Error Branch 

TAD 

17 

No, Get Sta^t'ting’*Chan r No, 

TAD 

sDIbb 

Add Last Mod. Temperature 


C 


Chan* No, 


« Ti 

EU; 


ET: 


EV; 


CIA 


Compliment 

TAD 

HI 

Add Error Chan, No, 

SMA+CLA 


More? 

JMP 

EU 

Yes , Go Chamber Temperature 
Error Branch’”" 

TAD 

It) 

Get No, Of Mods, 

TAD 

= 1 

Add 1 

TAD 

cn 

Add Compliment Of Current Mod 

DCA 

DC 

Set “DC” To Current Mod, No, 

TAD 

C2 


CALL 

2,\MPY 

Adjust Switch Closure 

PAR 

=D20 

For BATT No. 

TAD 

DC 

Add Mod, No, 

DCA 

DC 

Deposit In DC, 

CALL 

1 , CLOSE 

Close Switch For Mod. Error 

PAR 

DC 


JMS 

WA 

Go Wait 

^PERATURE 

SHUTDOWN 

BRANCH 

TAD 

C2 

Get BATT No, 

CALL 

2,\MPY 


PAR 

=D20 

Adjust Switch Closure 

TAD 

=D8 

Add No. For Temperature Out 
Of Limit 

DCA 

DC 

Deposit In "DC" 

CALL 

1, CLOSE 

Close Switch For Temperature 
Error 

PAR 

DC 


JMS 

WA 

Go Wait 

TAD 

G2 

Get BATT Mo. 

CALL 

2,\MPY 

Adjust For Switch Closure 

PAR 

=D20 


TAD 

=D10 

Add No. For BATT Error 

DCA 

DC 

Deposit In DC 

CALL 

1 5 CLOSE 

Close Switch For BATT 
Error 

PAR 

DC 


JMS 

WA 


JMS 

HD 

Go* Print Header 

JMS 

?R 

Go f Print Error Line 

JMP» 

ER 

Return 

TERY VOLT 

OUT OF LIMIT BRANCH 

TAD 

G2 

Get BATT No, 

CALL 

2,\MPY 


PAR‘ 

=D20 

Adjust For Switch Closure 

TAD 

s6 

Add 6 For BATT Volt Error 

DCA 

DC 


CALL 

T , CLOSE 

Close Switch 

PAR 

DC 


JMS 

WA 

Go Wait 

JMP 

ET 

Close Other Switches 
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•CELL VOLT 

OUT OF LIMIT 

BRANCH 

ewj tad 

C2 

Get BATT No. 

CALL 

2AMPY 


PAR 

sD20 

Adjust For S wit oh Closure 

TAD 

=7 

Add 7 For Cell Volt, Error 

DCA 

DC 


CALL 

1 , CLOSE 

Close Switch 

PAR 

DC 


JMS 

WA 

Go Wait 

JMP 

ET 

GO, Close Other Switches 

•MODULE VOLT OUT OF LIMIT BRANCH 

EX: TAD 

C2 

Get BATT No. 

CALL 

2,\MPY 


PAR 

=D20 

Adjust For Switch Closure 

TAD 

Ok 

Add Module No, 

TAD 

= 6 


DCA 

DC 


CALL 

1 , CLOSE 

Close Switch 

PAR 

DC 


JMS 

WA 

Go Wait 

JMP 

ET 


•ROOM TEMPERATURE OUT OF 

LIMIT BRANCH 

EY; CALL 

2, CLOSE 

Closer Switch For Temperature 
Error BATT 1 

PAR 

=028 


JMS 

WA 

Go Wait 

CALL 

2, CLOSE 

Close Switch For Temperature 
Error BATT 2 

PAR 

=1)48 


JMS 

WA 

Go Wait 

CALL 

2, CLOSE 

Close Switch For System Shutdown 

PAR 

=D10 

JMS 

WA 

Go Wait 

HLT 


Halt 


t 



•RV REPLACE VALUE 

•REPLACE OLD HIGHEST / LOWEST VALUE WITH CURRENT DATA 


•LQ 

RW: 


BSS 

1 

Return Address 

JMS 

RP 

Store New Value 

TAD 

si7 


TAD 

10 


DCA 

10 

Set Pointer For Chan. No. 

TAD 

H1 

Storage 

DCA 

OOEO 

Load Chan No. 

JMS 

U1 

Store It 

TAD 

= 1000 

Set Pointer For BATT Volt, 

JMS 

IB 

Get It 

TAD 

Cl 

Get Flags 

AND 

=ooa^i 

Mask All But Captst And Reoond 

SZA-fCLA 


Captest, Or Reoond.? 

JMP 

RW 

Yes, Go Lo Storage 

TAD 

Cl 

Get Flags 

AND 

=001(0 

Mask All But "DAY" Flag 

SNA+GLA 


Day 

JMP 

RW 

No, Go Lo Store 

TAD 

=0063 

Set Pointer For Hi Storage 

JMS 

lA 

Store It 

JMP* 

RV 

Return 

STORE 

TAD 

=0263 

Set Pointer For Lo Storage 

JMS 

lA 

Store It 

JMP* 

RV 

Return 





•ROUTINE TO PRINT A STANDARD HEADER ON LINE PRINTER 


BSS 

CLA 

1 

Retur'n Address 

JMS 

LF 

Go Print'. A SoacinK Line 

JMS 

LF 

Go Print’ A SoaoinK Line 

TAD 

=0200 

Set Pointer For 

DCA 

10 

Scan Time 

JMS 

D1 

Get 1st Word 

TAD 

0020 


CALL 

0,BNBCD 

Convert To BCD 

CALL 

0,\PTP 

Load First Print Call 

JMS 

D1 

Get 2nd Word 

TAD 

0020 


CALL 

0,BNBCD 

Convert To BCD 

TAD 

=t)000 

Add Leading Period 

CALL 

0,\PTP 

Load Second Print Call 

JMS 

D1 

Get 3rd Word 

TAD 

0020 

CALL 

O.BNBCD 

=b000 

Convert To BCD 

TAD 

Add Leading Period 

CALL 

0,\PTP 

Load Third Print Call 

JMS 

D1 

Get nth Word 

TAD 

0020 


CALL 

O.BNBCD 

Convert To BCD 

TAD 

=bOOO 

Add Leading Period 

CALL 

0,\PTP 

Load nth print Call 

TAD 

C2 

Get BATT No. 

TAD 

=b2no 

Add 2 Leading Periods 

CALL 

0,\PTP 

Load bth print Call 

TAD 

=b000 


CALL 

0,\PTP 

Load bth Print Call And Print Line 

JMS 

LF 

Go Print A Line Of Dots 

TAD 

= 1200 

Set Pointer 

TAD 

11 

For BATT 

DCA 

10 

P.E.T, 

JMS 

D1 

Get 1st Word 

TAD 

0020 


CALL 

O.BNBCD 

Convert To BCD 

CALL 

0,\PTP 

Load First Print Call 

JMS 

D1 

Get 2nd Word 

TAD 

0020 


CALL 

OjBNBCD 

Convert To BCD 

RTL 

RTL 

Rotate Into Position 

TAD' 

= 0012 

Add Trailing Zero 

CALL 

0,\PTP 

Load Second Print Call 

TAD 

Cl 

Get BATT Flags 

AND 

=00110 

Mask All But Day Flag 

SZA+CLA 


Night? 

TAD 

= -1 

Yes, Add 1 

TAD 

=D12 

Set Day Code 


TAD 

=62«0 

Add Leading Periods 

CALL 

0,\PTP 

Load Third Print Call 

JMS 

D1 

Get 3rd Word 

TAD 

0020 


CALL 

O.BNBCD 

Convert To BCD 

TAD 

=6000 

Add Leading Zero 

CALL 

0,\PTP 

Load Fourth Print Call 

JMS 

D1 

Get Ath Word 

TAD 

0020 


GALL 

O.BNBGD 

S600Q 

Convert To BCD 

TAD 

Add Leading Period 

GALL 

0,\PT'P 

Load Fifth Print Gall 

TAD 

=6000 

Add Period 

CALL 

0,\PTP 

Load SiKth print Call , & Print line 

JMS 

LF 

Go Print A SDaoinK Line 

JMS 

WA 

Go Wait 

JMP« 

HD 

Return 

•SUBROUTINE ' 

TO PRINT A 

LINE OF PERIODS (LINE FEED) 

LF: BSS 

r 

Return Address 

TAD 

=-6 

Set Counter To -6 

DCA 

DC 


LG : TAD 

=6262 

Load 3 Periods 

CALL 

0,\PTP 

Load Print Call 

ISZ 

DC 

Last Char? 

JMP 

LG 

No, Do Again 

JMP« 

LF 

Yes , Return 

» SUBROUTINE 

TO TEST FOR ICMR REQUEST 

IQ: 1003 

IS: BSS 

1 

Return Address 

TAD 

SR 

Get "SR" 

AND 

= 0003 

Mask All But ICMR Requests 

AND 

C2 

Mask For BATT No. 

SZA+CLA 


Flag Set? 

JMS 

IR 

Yes, Go ICMR Record 

JMP* 

IS 

Return 

IR: BSS 

1 

Return Address 

CALL 

0,\CL 

Clear FPAC 

CALL 

2.ICF0UT 

Record Data On ICMR 

PAR 

H2 


PAR 

IQ 


JMP* 

IR 

Return 
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•WA (WAIT) 
•SUBROUTINE 


TO WAIT 


CLOSURE 



ENTRY 

WA 


WA: 

BSS 

1 

Return Address 


CLA 




DCA 

DC 

Set Counter To Zero 

W1: 

ISZ 

DC 

Incrmnt Counter, Is It Zero 


JMP 

W1 

No, Do Again 


JMP« 

WA 

Yes, Return 
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•TD (TEMPERATURE DATA SCAN) 
•ROUTINE TO SCAN TEMPERATURE DATA 


TD: 

BSS 

1 

Return Address 


TAD 

17 

Get Starting Chan No. 


TAD 

=0141 

Add 1H1 


DCA 

CH 

Store In Chan No. 


TAD 

16 

Store Compliment 


CIA 


Of No. Of 


DCA 

Cll 

Modules In '•CH” 


TAD 

=2 



DCA 

FU 

Set Function For OHMS 


TAD 

=t> 



DCA 

RA 

Set Range To 100K OHMS 


CALL 

1.VIDAR 

Initiate Acquisition 


PAR 

GH 


T6: 

TAD 

= -b 

Store -b 


DCA 

C 

In ”C” 

Ti: 

ISZ 

CH 

Increment Chan, No. 


JMS 

TV 

Go Get Data And Convert 


ISZ 

C 

Increment Meas. No. 


JMP 

T3 

Do Again 


ISZ 

CH 

Last Measurement 


JMP 

T6 

No , Do Again 


CALL 

O.VRSLT 

Clear VRSLT Routine 


CLA 


Clear Accumalator 


TAD 

17 

Get Starting Address 


TAD 

=Dl6b 

Set Scanner To First Chamber 




Temperature 


DCA 

CH 

Store In "CH” 


TAD 


Set Counter "CH” To -H 


DCA 

CH 



CALL 

1 ,VIDAR 

Initialize Acquisition 


PAR 

CH 


T2: 

ISZ 

CH 

Increment Chan. No. 


JMS 

TV 



ISZ 

CH 

No, Last Chamber Temperature? 


JMP 

T2 

No, Do Again 


CALL 

O.VRSLT 

Yes, Clear VRSLT Routine 


CALL 

0,\CL 

Clear FPAC 


CLA 




JMP» 

TD 

Return 

TV; 

BSS 

1 



CALL 

0,VRSLT 

Get Results 


DCA; 

HI 

Store Channel No. 


CALL 

1,VIDAR 

Initiate Acquisition 


PAR 

CH 



TAD 

0020 

Change Sign Of Data 


AND 

= 3777 



DCA 

0020 



JMS 

TX 

Go Verify Data Within Limits 


CALL 

r,INTL1 

Convert Data To 
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AND 

THERMO 

Degrees 

CALL 

1,\STO 

Store results In ''H2-Hii" 

PAH 

H2 


TAD 

SR 

Get Switch Register 

SPA+CLA 


In Hold? 

JMP 

TW 

Yes, Skip Limit Check 

TAD 

slUOO 

Set Pointer To Temp 

JMS 

IB 

Limit And Get It 

CALL 

i,\fsb 

Subtract Results 

PAR 

H2 


TAD 

0020 

Get Sign Of Results 

SPA+CLA 


Out Of Limit? 

JMS 

ER 

YeSi Go Error’ Routine 

TAD 

Cl 

Get flags 

AND 

=0100 

Mask All But Temperature 
Print Request 

SZA+CLA 


Print Requested 

JMS 

PR 

Yes , Go Print A Line 

JMS 

IS 

Go ICMR Record InK Check 

JMP» 

TV 


•AC (CALCULATE DATA) 


ROUTINE TO 

CALCULATE 

ORBIT SUMMARY DATA 

,C ; BSS 

1 

Retuj'n Address 

TAD 

= 120i» 


JMS 

IB 


TAD 

= 110b 


JMS 

lA 

Move SUNSET TIME Data 

TAD 

= 1207 

To Print Storage 

DCA 

10 

JMS 

D1 


TAD 

= 1110 


DCA 

10 


JMS 

U1 


TAD 

= 1200 

Set Pointer For BATT. P,E,T, 

JMS 

R1 

Get It And Store "H2-H4'' 

TAD 

= 110.-} 

Set Pointer To 

TAD 

11 

Store Orbit No, 

DCA 

10 


TAD 

H2 

Get First Word 

DCA 

0020 


JMS 

U1 

Store It 

TAD 

Hi 

Get Second Word 

DCA 

0020 


JMS 

U1 

Store it 

TAD 

= 1102 

Set Pointer To Get 

TAD 

11 

Discharge Counter 

DCA 

10 

JMS 

D1 

Get It 

TAD 

= 1111 

Set Pointer To Store 

TAD 

11 

Discharge Counter 

DCA 

10 

JMS 

U1 

Store It 

TAD 

=oiab 

Set Pointer To Get 60 

DCA 

10 


JMS 

Di 

Get It 

CALL 

1 ,\STO 

Store 60 In "A" 

PAR 

A 


TAD 

o 

it 

Set Pointer To Get Summ, ”A'’ 

JMS 

R2 

Get And Div. By 60 

TAD 

= 1112 

Set pointer To PPG WHO 

JMS 

lA 

Store Results As PPG~WHO 

TAD 

= 10^11 

Set Pointer For Summ. ”B" 

JMS 

R2 

Get It And Div, By 60 

TAD. 

= 1 123 

Set Pointer To BPRC WH 

JMS 

lA 

Store Results As BPRC WH 

TAD 

= 10^17 

Set Pointer For Summ, "D" 

JMS 

R2 

Get It And Div . By 60 

CALL 

0,\T 

TAD 

= 1126 

Set Pointer To MIT_AH0 

JMS 

lA 

Store Results As BATT"aHO 

TAD 

=10b2 

Set Pointer For Summ, 


C iO 



f. 

I : 

r 


r 


i 






JMS 

R2 

CALL 

0,\T 

TAD 

= 1134 

JMS 

lA 

TAD 

= 10b3 

JMS 

R1 

JMS 

NZ 

TAD 

= 1036 

JMS 

R3 

TAD 

= 111b 

JMS 

lA 

TAD 

= 1047 

JMS 

R1 

JMS 

NZ 

TAD 

= 10bb 

JMS 

R3 

CALL 

0,\T 

TAD 

= 1131 

JMS 

lA 

TAD 

= lObO 

JMS 

R1 

JMS 

NZ 

TAD 


JMS 


CALL 

0,\T 

TAD 

= 1137 

JMS 

lA 

TAD 

= 1063 

JMS 

R1 

JMS 

NZ 

TAD 

= 1066 

JMS 

R3 

TAD 

= 1160 

JMS 

lA 

TAD 

= 1044 

JMS 

R1 

JMS 

NZ 

TAD 

= 10 36 

JMS 

R3 

TAD 

= 116b 

JMS 

I A 

TAD 

= 1077 

JMS • 

IB 

TAD 

= 1120 

JMS 

lA 

TAD 

=1071 


Ibi 


Get It And Div, By 60 
Change Sign Of Results 
Set Pointer For BAT T WHO 
Store Results As BA TT WHO 
Set Pointer For Summ. "H” 

Get It And Store In 'VH2-H4” 
Test Results For Zero 
Set Pointer For Sunitn, ”A" 

Get It and Piv. Summ. 

Set Pointer To PPG EFF 
Stone Results as PPG EFF 
Set Pointer For Summ. '*0" 

Get It And store 
Go Test Results For Zero 
Set Pointer For Summ. ”F” 

Get It And Div. By Summ. ”D" 

Change Sign Of Data 

Set Pointer To RF 

Store Results As RF 

Set Pointer For Summ, ”G'' 

Get It And Store Tn 
Test Besuits For Zei o 
Set Pointer For Summ, "E” 

Get IVjta And Div, By Summ. 
Chln?je tr-sults 

Set Pointer To BATT EFF . 
Store Results As BATT EFF . 
Set Pointer For Summ. ”H" 

Get It And Store ''H2-H4« 

Go Test Results For Zero 
Set Pointer For Summ. I 
Get It And Div, By Summ. "H” 
Set Pointer To CH RG. EFF. 
Store Results AS CHR G . EF F . 
Set Pointer For Summ r"C" 
Store Results 
Go Test results For Zero 
Set Pointer For Summ. "A” 

Get It And Div, By Summ, '’G" 
Set Pointer To REGj._EFF^ 
Store Results As REG. EFF, 
Set Pointer For B ATT TE MP. 

Temporary Stora^ge 
Get It 

Set Pointer To BATT TEMP. 

Print Storage 
Store Data As BATT_TEMP^ 

Set Pointer For CHRG R. T EMP. 

Temporary Storage 
Get It 

Set pointer To CHRGR. TEMP . 
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Print Storage 


JMS 

lA 

Store Data As CHRGR. ,,TEMP. 

TAD 

= 107il 

Set Pointer For REG . "TEMP. 
Temporary Storage 

JMS 

IB 

Get It 

TAD 

= 1171 

Set Pointer To REG. TEMP. 
Print Storage 

JMS 

lA 

Store Data As REG. TEMP. 

TAD 

o 

o 

II 

Set Pointer For HiTpLL VOLT. 
Temporary Storage 

JMS 

IB 

Get It 

TAD 

= 11H2 

Set Pointer For HT CELL 

vau: •"'print Storage 

JMS 

lA 

Store It 

TAD 

=0103 

Set Pointer For Hi CELL CHAN. 

TAD 

11 

No, Temporary’^Storage 

DCA 

10 

JMS 

D1 

Get It 

TAD 

= 1 l^lb 

Set Pointer To HI CELL CHAN. 

TAD 

11 

No, Print Storage 

DCA 

10 

JMS 

U1 

Store It 

TAD 

=00b3 

Set Pointer For BAIT Volt At 
HT^CELL VOLT, 

JMS 

IB 

Get It 

CALL 

1 , \ST0 

Store In "H2-H1)'' 

PAR 

H2 


CALL 

1 , FLOAT 

Convert No, Of Cells To 

PAR 

C3 

Fit, Point 

CALL 

1,\ST0 

Store In "A" 

PAR 

A 


GALL 

1,\FAD 

LoaJ BATT V Into FPAC 

PAR 

H2 


CALL 

1 ,\FDV 

Divide By No. Of Cells 

PAR 

A 

TAD 

= 11116 

Set Pointer To AVE HI CELL VOLT 

JMS 

JA 

Store Results ln“AVR. HI 
GELL VOLT. 

TAD 

=02111 

Set Pointer For LO. CELL 

VOLT . Temporary Storage 

JMS 

IB 

Get It 

TAD 

= 11b1 

Set Pointer To LO CELL VOLT 
Print storage 

JMS • 

lA 

Store It 

TAD 

II 

o 

o 

Set Pointer For LO, CELL NO. 

TAD 

11 

No, Temporary Storage 

DCA 

10 

JMS 

D1 

Get It 

TAD 

= 1161) 

Set Pointer To LO CELL 

TAD 

11 

NO. Print Storage 

DCA 

10 
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T 


R1 ; 


R2: 


R3: 


R4: 


Rb; 


« T1 
NZ; 


JMS 

U1 

Store It 

TAP 

II 

O 

<T 

Set Pointer For LO BATT 

VOLT. Temporary Storage 

JMS 

R2 

Gel It And Div, By No, Of Cells 

TAD 


Set pointer To AVE. LO CELL 

VOLT. Print Storage 

JMS 

lA 

Store It 

JMP» 

AC 

Return 

BSS 

1 


JMS 

IB 

Get Data From Bank 2 

CALL 

1,\ST0 

Store It In "H2-H4» 

PAR 

H2 


JMP* 

R1 

Return 

BSS 

1 


JMS 

IB 

Get Data From Bank 2 

CAL" 

1,\FDV 

Divide It By »A»' 

PAR 

A 

JMP» 

R2 

Return 

BSS 

1 


JMS 

IB 

Get Data From Bank 2 

CALL 

1,\FDV 

Dividit By "H2-H4" Data 

PAR 

yo 

JMP» 

K3 

Return 

BSS 

1 


JMS 

IB 

Get Data From Bank 2 

CALL 

1,\FSB 

Subtract "Ha-HU” Data From It 

PAR 

H2 


JMP* 

R4 

Return 

BSS 

1 

Return Address 

PCA 

10 

Set Pointer 

JMS 

D3 

Get Data 

CALL 

1,\FMP 

Divide By ''H2-H4'* 

PAR 

H2 

CALL 

1,\ST0 

Store Results In »H2-H4» 

PAR 

H2 


CALL 

1,\FAD 

Restore Results In FPAG 

PAR 

H2 


JMP* 

Rb 

Return 

)T FOR 

ZERO DATA 


BSS 

1 

Return Address 

TAD 

H2 

Get MSB 

SNA 


Is It Zero? 

TAD 

= 2014 

Yesj Add 1 

DCA* 

H2 

Redeposit In H2 

JMP* 

NZ 

Return 
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» VD (SCAN VOLTAGE DATA) 

» ROUTINE TO SCAN VOLTAGE DATA ON CELLS AND MODULES 


VD: BSS 1 

TAD 17 

TAD s 1 

DCA CH 

TAD 

DCA RA 

TAD = 1 

DCA FU 

TAD C3 

CIA 

DCA C3 

TAD 16 

CIA 

DCA CM 

TAD Cl 

AND sOOOA 

SZA+CLA 
JMP VC 

TAD Cl 

AND =OOilG 

SNA+CLA 
JMP VN 

•» DAY LIMIT CHECK 
TAD rlAlA 

JMS IB 

: CALL l,\STO 

PAR A 

CALL 1,VIDAR 

PAR CH 

f VI: ISZ CH 

GALL 0,VRSLT 

DCA HI 

; CALL 1,VIDAR 

PAR CH 

' CALL 1,\STO 

PAR H2 

TAD SR 

SPA+CLA 
JMP V2 

t CALL 1,\FAD 

PAR A 

CALL* 1,\FSB 

PAR H2 

TAD 0020 

SPA+GLA 

: JMS ER 

TAD =00^11 

; JMS IB 


Return Address 
Set Up 
Starting 
Channel No, 

Set Up IDVM 


Set "C^'» To Neg. No. Of Cells 


Set "CA" To Neg. No, Of Modules 
Get BATT Flags 

Mask Out All But ''GAPTEST'» Flag 
Captest? 

Yes, Go "CAPTiSTlJ^e^ Branch 

Get BATT Piags 

Mask Out All But «DAY” 

Day? 

No, GO NIGHT Test Branch 

Set Pointer To Cell Hi Limit 
Get It 
Store In A 

Initialize Acquisition 

Increment Chan, No , 

Store Chan No, In »'H1« 
Initialize Acquisition 

Store Data In "H2-Hi|» 

Get Switch Reg, Storage 
"HOLD” On? 

Yes, Go Print Che ck Branch 
Put Limit Value Tn'’’FPAC 

Subtract Data 

Get Sign Of Result 
Out Of Limit? 

Yes, Go Error Che ck Branch 
Set Pointer “For HI ^CELL VOLT . 

Temporary Storage 
Get Current Hi 
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CALL 

1,\FSB 

Subti’acti Cmn'ent; Cell Volt. 


PAR 

H2 



TAD 

0020 

Get Sign Of Reaulfc 


SPA+CLA 


New Higher 


JMS 

RV 

Yes, Go Reolaoe HI Cell Volfc, 

V2{ 

TAD 

C1 

Get Flags 


AND 

=0200 

Mask All But "VOLT. PRINT" 


SZA+CLA 


Request 



"PRINT" Requested? 


JMS 

PR 

Yes, Go Print Data 


JMS 

IS 

00 mfxjmn 


xsz 

C3 

Last Cell 


JMP 

VI 

No, Do Again 


TAD 

=D13b 

Yes , Set Chan. No To 


TAD 

17 

First Mod. Volt, 


DCA . 

CH 



CALL 

0 , VRSLT 

Clr, VRSLT Routine 


TAD 

=!? 

Set Range For Module Volt 


DCA 

RA 

VH: 

CALL 

1,VIDAR 

Initialize Acquisition 


PAR 

CH 

Vd! 

ISZ 

CH 

Inor-emeht chan No, 


CALL 

0,VRSLT 



DCA 

H1 



CALL 

1 ,VIDAR 

Initialize Acquisition 


PAR 

CH 


CALL 

1 ,\STO 

Store Data In "H2-H4" 


PAR 

H2 



TAD 

Cl 

Get BATT Flags 


AND 

= 0200 

Mask All But "PRINT" Request 


SZA-fCLA 


Print Requested? 


JMS 

PR 

Yes, Go Print Data 


JMS 

IS 

Go Test For ICMR 


ISZ 

CH 

Last Module? 


JMP 

Vi 

No, Do Again 


CALL 

0,VRSLT 

Clr. VRSLT Routine 


CLA 


Glear accum. 


CALL 

0,\CL 

Clear FPAC 


JMP» 

VD 

Return 

•program BRANCH FOR CAPTST 

VC : 

TAD 

Cl 

Get Flags 


AND 

= 2000 

Mask All But "BPRC 


SZA+CLA 


ACKLDG" 



"BPRC ACKLDG"? 


JMP 

VH 

Yes, Go Check "RECONDITIONING" 


TAD 

Cl 

Get Flags 


AND 

=0010 

Mask All But "BPRC LIMIT" 


SZA+CLA 


"BPRC LIMIT"? 


JMP 

Vb 

Yes, Go Set "CAPTEST OVER" 




Flag 


TAD 

Cl 

Get BATT Flags 


SPA+CLA 


1.0V Limit Reached? 

JMP 

VN 

Yes, Go Set low Limit 

TAD 


No, Set pointer For 1,0V Limit 

TAD 

11 

DCA 

10 


JMS 

D3 

Get It 

CALL 

1,\ST0 

Store Limit In A 

PAR 

A 


CALL 

1 ,VIDAR 

Initialize Acquisition 

PAR 

CH 


ISZ 

GH 

Increment Chan, No, 

CALL 

OjVRSLT 


DCA 

HI 


CALL 

1 ,VIDAR 

Initialize Acquisition 

PAR 

CH 


CALL 

1,\ST0 

Store Data In '•H2-H4'» 

PAR 

H2 


TAD 

SR 

Get Switch Reg. Storage 

SPA+CLA 


In "HOLD"? 

JMP 

V9 

Yes, Go Print Check 

CALL 

1 ,\Fkd 

Put Data In FPAC 

PAR 

H2 


CALL 

1 ,\FSB 

Subtract Limit 

PAR 

A 


TAD 

0020 

Get Sign Of Results 

SPA+CLA 


Under Limit 

JMS 

CE 

Yes, Go "CAPTEST” Error 

TAD 

=0241 

Set Pointer For LOWEST CELL 
VOLT. Storage 

JMS 

IB 

Get It 

CALL 

1 ,\FSB 

Subtract Data 

PAR 

H2 


TAD 

0020 

Get Result Sign 

SMA+CLA 


New Data Lower? 

JMS 

RV 

Yes, Go Renlace 

TAD 

Cl 

Get BATT Flags 

AND 

= 0200 

Mask All But ’'PRINT" Flag 

SZA+CLA 


Print Requested 

JMS 

PR 

Yes , Go Print 

JMS 

IS 

Go Test For’ ICMR 

ISZ 

Ci 

Last Chan? 

JMP 

V8 

No , Do Again 

TAD . 

=D13b 

Set Starting Chan, To First 

TAD 

17 

Module Voltage 

DCA 

GH 


CALL 

OjVRSLT 

Clr.VRSLT Routine 

TAD 

= 8 


DCA 

RA 

Set Range 

TAD 

G1 


AND 

=0004 

Get BATT Flags 

SPA+CLA 


Is ''CAPTEST" On 



JMP 

JMP 

VB: TAD 

DCA 
JMS 
CALL 
PAR 
CALL 
PAR 

VE; ISZ 
CALL 
DCA 
CALL 
PAR 
CALL 
PAR 
TAD 

SZA+CLA 

JMP 

GALL 

PAR 

CALL 

PAR 

TAD 

SMA-fCLA 

JMP 

JMS 

JMS 

VFi CL A 
TAD 
AND 

SZA-fCLA 

JMS 

JMS 

ISZ 

JMP 

CALL 

CLA 

CALL 

JMP« 

•CAPTST ON, ; 

VA: TAD 

AND. 


VA 

VH 

II 

10 

D3 

1,\STO 

A 

1 ,VIDAR 

CH 

CH 

0. VRSLT 
HI 

1 , VIDAR 
CH 

1,\ST0 

H?. 

SR 

VF 

1 , \FAD 

Ha 

A 

0020 


Cl 

=0200 


SZA^-CLA 

JMP 


TAD =1411 

JMP VB 

•NIGHT LIM CHECK 
VN : TAD =1417 


Yes, Go "CAPTEST'' Mod Volb Check 
Go Mod . Volb % Branch 


Geb Ib 

Shore Llmlb In A 
Inibiali7,e Acquisition 
tncremenb Chan. No. 


Initialize Acquiaibion 

Store Data In «Ha-H4« 

Get Switch Reg. SboraKe 
In Hold? 

Yes , Go Check Print Request 
Load Data Into FPAC 

Subtracb Limit 

Get Sign Of ResuXts 
Below Limit 

No, Go Test Pri nt Branch 
Yes, Go Print Heade r 
Go Print Data 

Get Flags 

Mask All But Print Request 
Print Pequested? 

Yes, Go Print 
Go Test For ICMP. 

Last Module? 

No, Do Again 
Clear VRSLT Routine 


Return 
OVER ? 

Get BATT, Flags 
Mask Out All Bub "BPRC 
Acknowledged" Flag 
BPRC Acknowledged? 

Yes , Go Mod. Volt . Branch 
High "Limi t”' 

Adjust Pointer For Low Limit 
Return 

Set Pointer For 0.0b V Limit 






TAD 

11 


DC A 

10 


JMP 

VG 

Go Test Bi'anch 

»RECOND CHECK 


VH: TAD 

Cl 

Get BATT Flags 

AND 

= 0020 

Mask All But Recond, 

SNA+CLA 


Recond, On? 

JMP 

VN 

No, Go NiKht Limit Branch 

TAD 

= l42b 

YeSj Set Pointer For 

TAD 

11 

Recond, Limit 

DCA 

10 


JMP 

VG 

Go Test Branch 

V15 : TAD 

= 1 


DCA 

TO 

Set ’'Captest Over” Elag 

JMP 

V4 

Go NiRht Check Branch 

»CAPTST OR NIGHT VOLT 

OUT OF LIMIT 

CE: BSS 

1 

Return Address 

TAD 

Cl 

Get BATT Flags 

AND 

= 0004 

Mask All But "CAPTEST” 

SNA+GLA 


On? 

JMP 

CY 

No, Go Normal Error Branch 

TAD 

Cl 

Get Flags 

SPA+CLA 


"1,0V RCHD" Flag Set? 

JMP 

CY 

Yes, Go Normal Error Branch 

» USING 1,0 V 

LIM. BUT 

NOT RCHD BEFORE 

TAD 

CH 

No, Get BATT No, 

TAD 

=-1 

Adjust 

CALL 

2,\MPY 

Multiply By b 

PAR 

= b 


TAD 

FP 

Add Faulty Chan Pointer 

DCA 

DC 

Deposit In "DC” 

TAD 

=-b 

Set "TE" To -b 

DCA 

TE 


CZ: TAD* 

DC 

Get Faulty Chan , No, 

CIA 


Compliment 

TAD 

HI 

Add Current Chan, No , 

SNA+CLA 


Agree 

JMP* 

CE 

Yes , J'-jturn 

ISZ 

DC 

No , Increment Faulty Chan Addr 

ISZ 

TE 

Last Faulty Chan , 

JMP 

CZ 

No, Do Again 

TAD 

Cl 

Get Flags 

AND- 

“3777 

Mask Out "1,0V REACHED" Flag 

TAD 

= 4000 

Set "1,0V REACHED" Flag 

DCA 

Cl 

Redeposit Flags 

JMS 

HD 

Go Type Header 

JMS 

PR 

Go Print Data 

CALL 

0,\GL 

Clear FPAC 

CALL 

1 ,\FAD 

Load Data Into FPAC 

PAR 

H2 


CALL 

T,\STO 

Store In "A" 



C 38 


1 


PAR 

A 


TAD 

= 03Sb 

Set Polntei' To Get Fit. pt. 60 

DCA 

10 


JMS 

D3 

Get It 

CALL 

1,\ST0 

Stoi'e in "H2-H4” 

PAR 

H2 


TAD 

HI 

Store Chan No. In ’’DC' 

DCA 

DC 


TAD 

=0888 

put 88R In HI 

DCA 

HI 


TAD 

slOit? 

Set pointer For Summ. ”D" 

JMS 

Ri 

Get It And Div. By 60 

CALL 

1,\ST0 

Store Results In "H2-H4” 

PAR 

H2 


JMS 

PR 

Go Print Data 

TAD 

=D999 

put 999 In HI 

DCA 

Hi 


TAD 

-OiZb 

Set Pointer For Fit. Pt, 60 

DCA 

10 


JMS 

D3 

Get It 

CALL 

1 , \STO 

Store in "H2-H4’' 

PAR 

H2 


TAD 

= 10b?. 

Set Pointer For Summ. ’’E” 

JMS 

R3 

Get It And Div. By 60 

TAD 

0020 

Change Sign Of Result 

TAD 

s^GOO 

DCA 

0020 


CALL 

1,\ST0 

Store Results In "H2-H4" 

PAR 

H2 


JMS 

PR 

Go Print 

CALL 

1,\FAD 

Put Data In "A" In FPAC 

PAR 

A 


CALL 

1 ,\STO 

Put Data Back In ''H2-H4'' 

PAR 

H2 


TAD 

DC 

Set "HI" To Chan No, 

DCA 

HI 


TAD 

= 1422 

Set Pointer For Lo Llm, 

JMS 

IB 


CALL 

1 j\STO 

Store It in "A" 

PAR 

A 


JMP« 

CE 

Return 

* 1,0 V LIMIT 

NOT IN 

USE 

CY: JMS 

ER 

Go Error Routine 

JMP» 

CE 

Return 
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•BANK SET UP AND TRANSFER ROUTINE 


EB: BSS 

1 

Temporary Storage 

ED: BSS 

1 

Temporary Storage 

•TRANSFER i 

WORDS FROM 

BANK 1 TO BANK 2 STO 

U3: BSS 

CLA 

1 

Return Address 

TAD 

=0020 

Set "ED” To Loo 0020 

DCA 

ED 


TAD 

r-3 

Set "EB” To -3 

DCA 

EB 


Ni: TAD* 

6221 

ED 

Load Indirect Through Loc . 0020 

DCA» 

6211 

10 

Store 

ISZ 

ED 

Increment Data Location 

ISZ 

EB 

Last Word 

JMP 

N3 

No, Do Again 

JMP* 

U3 

Return 

•TRANSFER 3 

WORDS FROM 

BNK 2 TO BANK 1 

ENTRY 

D3 


D-<: BSS 

CLA 

1 

Return Address 

TAD 

=0020 

Load "ED" With Loc 0020 

DCA 

ED 


TAD 

="3 

Load "FB" With 

DCA 

N4: 6221 

EB 


TAD* 

6211 

10 

Load Indirect Through 0010 

DCA* 

ED 

Store Indirect Through "ED" 

ISZ 

ED 

Increment Storage Location 

ISZ 

EB 

Last Word 

JMP 

N4 

No, Go Again 

JMP* 

D3 

Return 

•TRANSFER 1 

WORD FROM 

BANK 1 TO BANK 2 STO 

ENTRY 

U1 


U 1 : BSS 

CLA 

1 

Return Address 

TAD 

6221 

0020 

Load From Loc 0020 

DCA* 

6211 

10 

Store Indirect Through 0010 

JMP* 

U1 

Return 

*TRANSFER 1 

WORD FROM 

BANK 2 TO BANK 1 FPAC 

ENTRY 

D1 


D1: BSS 

CLA 
6221 

1 

Return Address 

TAD* 

6211 

10 

Load Indirect Through 0010 

DCA 

0020 

Store In Log 0020 


UiUGllvAL PAGE xr 
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* OD (SCAN AND CONVEPT ORBIT DATA) 


BSS 

1 

Re<:.urn Address 

TAD 

=6 

Set IDVM Range 

DCA 

RA 


TAD 

= 1 

Set Function 

DCA 

FU 

To Volts 

TAD 

17 

Store Starting 

DCA 

CH 

Address In "C” 

CALL 

1 ,VIDAR 

Initiate Acquisition 

PAR 

CH 


CALL 

0,VRSLT 

GeA Results 

DCA 

HI 

Store Chan. No. In "HI" 

TAD 

= 1000 

Set Pointer For "BATT VOLT” 
Storage 

JMS 

lA 

Store It In Bank 2 

CALL 

1 ,\STO 

Load Data Into FPAC 

PAR 

H2 


TAD 

Cl 

Get Flags 

AND 

= 1000 

Mask All But "BATT DISCONNECT" 

SPA+CLA 


Is It On? 

JMP 

OF 

Yes, Skip Calculations 

TAD 

SR 

Get "SR" 

SPA+CLA 


"HOLD" Set? 

JHP 

OF 

Yes Skip Calculations 

TAD 

Cl 

Get Flags 

AND 

sOOOA 

Mask All But Captst, 

SZA+CLA 


In Captst.? 

JMP 

OM 

Yes Go Captst, Branch 

TAD 

Cl 

Get Flags 

AND 

=00 AO 

Mask All But Day 

SNA+CLA 


Night? 

JMP 

OE 

Yes Go Night Check 

TAD 

= lA0j 

Set Pointer For 

"BATT, V0LT> HI LIMIT 

JMS 

ft A 

Get It And Sub. Curr, Value 

TAD 

0020 

Get Sign Of Results 

SPA+GLA 


Over Limit? 

JMS 

ER 

Yes, Go Error 

CALL 

0,\CL 

Clear PPAC 

JMS 

RA 

Sub , Gurr , Data 

TAD 

0020 

Get Sign Of Results 

SPA+CLA 


Higher 

JMS ‘ 

RP 

Yes , Go Replace 

TAD 

17 

Set Chan. To Next Data 

TAD 

=D173 


DCA 

CH 


TAD 

= A 

Set Range 

DCA 

RA 


JMS 

PC 

Go Check For Print And 



Get New Data 

TAD 

=03A1 

Set Pointer For Conversion 


Factor (|j*o) 


JMS 

Rb 

Go MulfciplY^ Bv Data 

TAD 

= 1003 

Set Pointer To Meas. 178 Storage 

JMS 

lA 

Store It 

ISZ 

CH 

Increment Chan, No. 

JMS 

PC 

Go Check For Print And 
Get New Data 

TAD 

=0300 

Set Pointer For Convereion 
Factor (lb) 

JMS 

Rb 

Go Multiolv Bv Data 

TAD 

= 1006 

Set Pointer To Meas , 179 Storage 

JMS 

lA 

Store It 

ISZ 

CH 

Increment Chan, No, 

JMS 

PC 

Go Check For Print And 
Get New Data 

TAD 

II 

0 

0 

Set pointer For Conversion 
Factor (4) 

JMS 

Rb 

Go Multiply Bv Data 

TAD 

= 1011 

Set Pointer To Meas, 180 Storage 

JMS 

lA 

Store It 

ISZ 

CH 

Increment Chan, No, 

TAD 

=b 


DCA 

RA 

Change IDVM Range 

JMS 

PC 

Go Check For Print And 
Get, New Data 

CALL 

1,\FAD 

Load Data Into FPAC 

PAR 

Ha 


TAD 

= 1014 

Set Pointer For Meas, 181 Storage 

JMS 

lA 

Store It 

ISZ 

CH 

Increment Chan, No, 

TAD 

= 4 

Change IDVM Range 

DCA 

RA 


JMS 

PC 

Go Check For Print And 
Get New Data 

CALL 

i,\fad 

Restore Data In FPAC 

PAR 

H2 


TAD 

= 1017 

Set Pointer To Meas, 16 E Storage 

JMS 

lA 

Store It 

ISZ 

CH 

Increment Chan No. 

TAD 

= 2 

Ghange 

DCA 

RA 

Range 

JMS ' 

PC 

Go Gheok For Print And 
Get New Data 

TAD 

=0336 

Set Pointer For Conversion 
Factor (bOO) 

JMS 

Rb 

Multiply By Data 

TAD 

= 1022 

Set Pointer For Meas. 183 Storage 

JMS 

lA 

Store It 

ISZ 

CH 

Increment Chan , No. 

TAD 

= 4 

Change 


DCA 

JMS 

TAD 

JMS 

TAD 

JMS 

ISZ 

JMS 

TAD 

JMS 

TAD 

JMS 

ISZ 

JMS 

TAD 

JMS 

TAD 

JMS 

ISZ 

JMS 

JMS 

CALL 

PAR 

TAD 

JMS 

TAD 

SPA->-CLA 

JMS 

ISZ 

JMS 

JMS 

CALL 

PAR 

TAD, 


JMS 

TAD 

SPA+CLA 

JMS 

ISZ 

TAD 

DCA 


RA 

PC 


= 03^*1 


Rb 

= 102b 
lA 
GH 
PC 

=0314 

Rb 

= 1030 
lA 
CH 
PC 

=0300 

Rb 

= 1033 

lA 

CH 

PC 


TC 

1 ,\ST0 
H2 

= 1071 
R4 

0020 

RP 

GH 

PC 


1 ,\STO 
H2 

= 1074 


R4 

0020 

RP 

CH 

=2 

FU 


Range 

Go Chec k For Print An d 
Get “New , Data 

Set Pointer“For Conversion 
Factor (b) 

Multiply By Data 

Set Pointer To Meas, 1Q4 Storage 
Get It 

Increment Chan, No, 

Go C heck For Print And 
Ge t New Data 

Set PoTnter For “Conversion 
Factor (40) 

Multiply By Data 

Set Pointer To Meas, l3b Storage 
Store It 

Increment Chan, No, 

Go Check For Pri n t And 
Get Ne w Data 

Set Pointer ~For’“Conversion 
Factor (1b) 

Multiply By Data 

Set Pointer To Meas, 1B6 Storage 
Store It 

Increment Chan , No , 

Go C heck _For Print And 
Get New Data ^ 

Go Convert “fb Temperature 
Store Result In »'H2-H4*' 

Set pointer For Current Hi Temp. 

Get It 

Get Sign Of Results 
New Hi 

Yes , Go Replace 
Increment Chan . No, 

Go Ch e c k For P r i n t And 
Get New Data 

Go Con V er b'“To .Te^mpe r a tur e 
Store R^ults In "H2-H4^ 

Set Pointer For Highest Reg. Temp, 

Get It 

Sub , Curr , Temperature 
Get It And Sub . Curr , Temp . 

Get Sign Of Results 
New Hi? 

Yes , Go Replace 
Increment Chan , No , 

Change IDVM Function 

'•ilGrjIAL PAGE IS 
W POOR QUALITY 

C 44 




ill '■ 3 


Change IDVM Range 


TAD sb 

DC A RA 

JMS PC 

CALL 1,\FAD 

PAR H2 

TAD 0020 

AND =3777 

DCA 0020 

JMS TX 

CALL 1.INTL1 
AND THERMO 

CALL t,\STO 

PAR H2 

TAD =1077 


JMS 

TAD 

SPA+CLA 

JMS 

JMS 

CALL 

TAD 

SPA+CLA 

JMP» 

TAD 

JMS 

JMS 

CALL 

PAR 

CALL 

PAR 

TAD 

JMS 

CALL 

PAR 

JMS 

TAD 

JMS 


JMS 
CALL 
PAR , 
CALL 
PAR 


TAD 

JMS 

CALL 

PAR 

JMS 

TAD 


JMS 


RU 

0020 

RP 

PC 

0,\CL 

SR 

CD 

= 1006 
R1 


D3 

1 ,\FMP 
H2 

1 ,\STO 


H2 


= 1036 
IB 


1,\FAD 

H2 

RX 


= 101M 

R1 

D3 

1,\FMP 


H2 

1 ,\STO 
H2 


= 1041 


IB 


1,\FAD 


H2 

RY 

= 1000 
IB 


Go Check For P nln t And 
SF ^ Ne w Resu lts 
Load FPAC With Data 


Change Sign Of Results 

Go Ver ify D ata W ithi n 
Convert To Degrees 

Store In «H2-H4« 

Set Pointer To Highest BATT, 
Temperature 

Get It And Sub, Curr. Results 
Get Sign Of Results 
New Hi? 

Yes, Go Replace 


Get Switch Reg, Storage 
Hold On? 

Yes, Return 

Set Pointer For Meas . 179 Storage 
Get It And Store "H2-H4" 

Get Meas, 180 Data 
Multiply By Meas. 179 

Store Results In "H2-H4" 

Set Pointer For Suram. "A" 

Get It 

Add New Results To It 

Reset Pointer And Store 
Set Pointer For Meas, 18 1 
Get It And Store ''H2^H4" 

Get Meas 182 Data 
Multiply By Meas, I8l 

Store Results In "H2-H4'' 

Set pointer For Sumra, BD" 

Get It 

Add New Results To It 

Reset Pointer And Store 
Set Pointer For Meas. 000 
Get It 


G 4b 


^ 


CALL 

1,\ST0 

Sfcore In "A" 

PAR 

A 


JMS 

D3 

Get Meas# 17B Data 

CALL 

1 AFMP 

Multiply By Meas . 000 

PAR 

A 

CALL 

1 ,\STO 

Store Results In 'M12*H4” 

PAR 

H2 

TAD 

= 10^14 

Set Pointer For Sumra, "C 

JMS 

IB 

Get It 

CALL 

1 ,\FAD 

Add New Results To It 

PAR 

HP. 


JMS 

BY 

Go Reset ^Poirx,ttir And Store 

TAD 

Cl 

Get Biff flags 

AND 

=00«0 

Mask All But Day Flag 

SNA+CLA 


Night? 

JMP 

Nl 

Yes, Go Night Branch 

TAD 

Cl 

Get BATT Flags 

AND 

=0004 

Mask All But “CAPTEST'' 

SZA+CLA 


Cap test? 

IMP 

NI 

Yes, Go Night Branch 

TAD 

= 1022 

Set Pointer For Meas. 15 i 

JMS 

R1 

Go Ge.t It And Store In ”H2-H4» 

TAD 

=to^b 

Set Pointar For~Summ.”F” *'* 

TAD 

11 


DCA 

10 


JMS 

D3 

Go Get It 

CALL 

1 ,\FAD 

Add Current Data To It 

PAP 

H2 


JMS 

PY 

G 0 Reset. Pointer And Store 

TAD 

= 1022 

Set pbinter For ~Meas r”"l5 J 

JMS 

IB 

Get It 

CALL 

1,\FMP 

Multiply By Meas. 000 

PAR 

A 

CALL 

1 ,\ST0 

Store Results In "H2-H4'' 

PAR 

H2 


TA1> 

= 1060 

Set Pointer For Summ. "G" 

JMS 

IB 

Get It 

CALL 

1 A fad 

Add Current Results To It 

PAR 

H2 


JMS 

RY 

Go Reset Pointer And Store 

TAD 

= 102b 

Set Pointer For Meas,’’ T84'" 

JMS* 

R1 


JMS 

Di 

Get Meas , Ifib 

CALL 

1AFMP 

Multiply By Meas. 184 

PAR 

H2 

CALL 

1,\ST0 

Store Results In "H2-H4” 

PAR 

H2 


TAD 

= 10b,1 

Set Pointer For Summ. "H” 

JMS 

IB 

Go Get It 

CALL 

1AFAD 

Add Current Results To It 

PAR 

H2 




JMS 

PI 

G- ) Poinl.rii* And 

rAP 

= 1(H5 

Poin* 01* Fav 

Ji'lh 


■ ; • 

Ghhi 

1AFMP 

Multiply By Meas* 000 

PAR 

A 


CALL 

1,\STO 

Store Results In 

PAR 

HR 


TAD 

= 1066 

Set Pointer For Summ. "I” 

JMS 

IB 

Get It 

CALL 

1,\FAD 

Add New Results To It 

PAR 

H2 


JMS 

RY 

Go Reset Pointer And Store 

JMP» 

OD 

Return 

•NIGHT SUMMATIONS 


Nl; TAD 

= 1102 

Set Pointer For Disc, Counter 

TAD 

11 


DC A 

10 


JMS 

D1 

Get It 

TAD 

0020 


TAD 

= 1 

Increment Disc, Counter 

DCA 

0020 


TAD 

10 

And 

TAD 

= -l 


DCA 

10 


JMS 

U1 

Store It 

TAD 

= 1022 

Set Pointer For Meas, 183 

JMS 

R1 

Get It And Store 

TAD 

= 10^7 

Set Pointer For Summ, "D" 

JMS 

IB 

Get It 

CALL 

1,\FAD 

Add New Meas, 18J To It 

PAR 

H2 


JMS 

RY 

Go Reset Pointer And Store 

CALL 

0,\CL 

Clea'r"FPAt 

CALL 

IAFAD 

Load FPAC With Meas. IS ^ 

PAR 

H2 


CALL 

1,\FMP 

Multiply By Meas. 000 

PAR 

A 


CALL 

1,\ST0 

Store Results In ”H2~H'4'' 

PAR 

H2 


TAD 

= 1062 

Set Pointer For Summ, "E" 

JMS 

IB 

Get It 

CALL 

i,\fad 

Add New Results to It 

PAR 

H2 


JMS 

RY 

Go Reset Pointe!’ And Store 

JMP» 

OD 


•SUBROUTINE 

TO REPLACE 

NEW HIGHEST 

RP ; BSS 

1 

Return Address 

TAD 

10 

Reset Pointer 

TAD 

=-3 


DCA 

10 


CALL 

0,\CL 

Clear FPAC 


POOR QUALITT 


C i«7 



CALL 

1AFAD 

Load Data Into FPAC 


PAR 

HZ 



JMS 

Hi 

Stoj'y Data 


JMP* 

RP 

Return 

»TEST FOR LOWEST BATTERY VOLT 

OE; 

TAD 

s0200 

Set Pointer For Lowest BAT 


JMS 

IB 

Gel It 


CALL 

1,\FSB 

Subtract Current Voltage 


PAR 

H2 



TAD 

0020 

Get Sign Of Results 


SMA+CLA 


New Lo? 


JMS 

RP 

YeSi Go Replace 


JMP 

OF 

Continue Program 

•PRINT CHECK 

AND NEXT 

CHAN ACQUISITION 

PC; 

BSS 

1 

Return Address 


TAD 

Cl 

Get BATT Flags 


AND 

=0«00 

Mask All But Print Request 


SZA+GLA 


Print Requesteo? 


JMS 

PR 

Yes, Go Print 


CALL 

0,\CL 

Clear FPAC 


CALL 

1, VI DAP 

Initiate Asquisitlon 


PAR 

CH 



CALL 

OvVRSLT 

Get Data 


DCA 

HI 



CALL 

IjXSTO 

Store Da».a In "H2-HU'' 


PAR 

H2 



JMP* 

PC 

Return 

•SUBPOUTINE FOR TEMP CONVEPSION PPOM VOLTS 

TC; 

BSS 

1 

Petui'n Address 


TAD 

=OiOO 

Set Pointer For Limit 




Factor (0,b) 


DCA 

10 



JMS 

DA 

Go Get It 


CALL 

1,\STO 

Store Results In "A" 


PAR 

A 



CALL 

1,\PAD 

Reload limit 


PAR 

A 



CALL 

1,\FSB 

Subtract Resuits 


PAR 

H2 



TAD 

0020 

Get Sign Of Results 


SPA+CLA 


Below Limit? 


JMP’ 

TU 

No , Continue test 


CALL 

0,\CL 

Yes , Clear FPAC 


CALL 

1 ,\FAD 



PAR 

A 



CALL 

1 ,\STO 

Store i'few Value 


PAR 

H2 


TU: 

TAD 

= 031 1 

Set Pointer For Conversion 


DCA 

10 

Factor ( 10.0) 


JMS 

D3 

Go Gat It 


CALL 

1 ,\FSB 

Subtract D?itai 


Volt, 


C ilB 


PAR 

m 


CALL 

t,\STO 

Stora RasulVs In "A** 

PAR 

A 


TAD 


Sat Pointy*.’ For Convaralon 

PGA 

10 

Far. tor (lb) 

JMS 

U 

Go fiHt.It 

CALL 

1,\FMP 

Multiply By Pasults 

PAR 

A 

CALL 

1,\FDV 

Divide* By Data 

PAR 

HR 

JMS 

TX 


CALL 

IfINTLI 

Convart To pygraes 

AND 

THEP^50 

JMP» 

TO 

Pyturn 

BSS 

1 

Pauti’ri Addrass 

CALL 

1,\ST0 

Story rcsistanGr Equivalen 

PAR 

H2 

tri "H2-HH" 

CLA 

TAD 


S«t Pointer To High 

DCA 

10 

Tably Limit 

JMS 

D."! 

Go fiat .It 

CALL 



1 ,\FSB 

SubAr-Tcfc^Tamp . Equ.lv « 

PAR 

H2 

TAD 

0020 

Out Of Limit? 

SM A+CLA 
JMP 

TZ 

Yes, Go Pf’.pXaou 

TAD 

s2Mai 

Sa*- Pointer To Lo Limit 

DCA 

10 


JMS 

Di 

Go Gat It 

CALL 

1,\FSB 

H2 

Subtract data 

PAR 


TAD 

20 


SPA+CLA 


Out Of Limit 

JMP 

TZ 

Yes , Go Ad lust Branch 

TAD 

HI 

No, Test For Overrange 

SPA-fCLA 


Overrange? 

JMP 

TZ 

Y?is, Go Adlust Branch 

CALL 

0 ACL 

Clear FPAC 

CALL 

1 AFAD 

Restore Data In FPAC 

PAR 

H2 


JMP«' 

TX 


CALL 

0,\CL 

Clear FPAC 

TAD 

52iMn 

Get Low Table Limit 

DCA 

10 


JMS 

DJ 


JMF» 

TX 


TAD 

Cl 

Get Flags 

AND 

=2000 

Mask All But BPRC Acknldgd 

SNA+CLA 


Captst Over? 

JMP 

QE 

Yesi Go Low Replace Branch 


RY: 


TAD 

11 


TAD 

slHQb 

Set Pointer For Captst 

DC A 

10 

BATT, V. Limit 

JMS 

D3 

Get It 

CALL 

1 ,\fSB 

Subtract Current Value 

PAR 

Ha 


TAD 

0020 

Get Sign Of Results 

SMA+CLA 


Under Limit 

JMP 

OE 

No, Go Low Replace Bran 

JMS 

HD 

Go Print Header 

JMS 

PR 

Go Print Value 

JMP 

OS 

Go Replace Branch 

BSS 

1 


TAD 

10 

Replace Data As Is 

TAD 

-3 

DCA 

10 


JMS 

U3 


JMP<» 

RY 




• IT (ITERATE 

TAPE) 


» SUROUTINE TC 

I WRITE TIME 

: AND ORBIT DATA ON ICMR 

ML: OaOO 

MM: 0300 

MN: 0b02 

IK : BSS 

1 


IT: BSS 

1 


TAD 

=0077 


CALL 

0,\IMR 

Wri^e Record SLarK Char, 

TAD 

C2 


CALL 

0,\IMR 

Write BATT No. 

TAD 

=0200 

Set Pointer For T.O.Y. 

JMS 

IV 

Go Write T.O.Y, 

TAD 

11 


TAD 

= 1200 

Set Pointer For BATT P.E.T. 

JMS 

IV 

Go Write P.E.T. 

TAD 

Cl 

Get BATT Tlags 

RTR 

RTR 


Rotate Into Position 

RTR 

AND 

= 0077 

Mask 

CALL 

o,\imr 

Write Flag Bits 0-b 

TAD 

Cl 

Get BATT Flags 

AND 

= 0077 

Mask 

CALL 

0,\IMR 

Write Flag Bits 6-11 

TAD 

SR 

Get "SR" 

RTR 

RTR 


Rotate Into position 

RTR 

AND 

=0077 

Mask 

CALL 

0,\IMR 

Write "SR" Bits 0-b 

TAD 

11 

Set Pointer For Orbi.t Data 

TAD 

= 1000 


DCA 

10 


TAD 

=-D10 ' 

Set "IK" to -10 

DCA 

IK 


« WRITE ORBIT 

DATA 


IW: JMS 

Di 

Get Data Point 

CALL 

2,ICP0UT 

Output Data In Fit, Pt, 

PAR. 

0020 


PAR 

IQ 


ISZ 

IK 

Last Data? 

JMP 

IW 

NOj Go Again 

TAD 

=-3 

Set "IK" To -3 

DCA 

IK 


TAD 

1 1 


TAD 

= 1071 

Set poirvter For Orbit Temps 

DCA 

10 


» WRITE ORBIT 

TEMPS 


IX : JMS 

D3 

Get Temp 


€ b 1 




CAll 

ailCFOUT 

0030 

Outpu’i In r . 

PAR 


PAR 

MN 


ISZ 

IK 

L'lSt Temp? 

JMP 

IX 

NOj Do Again 

JMP» 

IT 

Reiiu'fi 


“ SUBROUTINE TO WRITE TIME OR P,E,T. 


BSS 

1 


DCA 

10 


JMS 

D1 

Go Get Pat. a 

CALL 

2,ICXOUT 

OuLpuL FirsL ^ DlgiLs 

PAR 

0020 


PAR 

MM 


TAD 

=-•< 

Set "IK" To 

DCA 

IK 


JMS 

D1 

Go GeL Daiu 

CALL 

a.ICIOUT 

Output 2 Digits 

PAR 

0020 


PAR 

ML 


ISZ 

IK 

Last Digit? 

JMP 

lU 

No , Do Again 

JMP»* 

IV 

Return 


G b2 





I 

I *’l't (TYPE) 

s “ROUTINE TO TYPE ORBIT OR CAPTEST DATA ON TTY 


DD: BSS 

1 

Temporary Storage 

TS ! BSS 

1 

Type Pointer Storage 

12: BSS 

1 

Pointer Storage 

Hit 0200 


Format XX 

M3; ObOO 


Format XXXXX 

MU; ObOi 


Format XXX.X 

Mb; ObOl 


Format XXXXTX 

M7; 0703 


Format XXX. XXX 

M8: 1003 


Format XXXX.XXX 

M9: 1100 


Format XXXXXXXX. 

MA: 1101 


Format XXXXXXX.X 

MB; 1103 


Format XXXXX. XXX 

MC: 1201 


Format XXXXXXXX. X 

ENTRY 

TY 


TY; BSS 

1 

Return Address 

CALL 

2, CLOSE 

Turn TTY On 

PAR 

= 3 


TAD 

=-10 


DCA 

DD 


Tbt gall 

0/WA 

Go Walt 

ISZ 

DD 


JMP 

Tb 


TAD“ 

TY 

Get Type Pointer 

DCA 

TS 

Store In TS 

ISZ 

TY 

Set Up Return Address 

TAD“ 

TS 

Get Type Indicator 

AND 

cOOOl 

Mask Ail But BATT 1 Flag 

SZA-4-CLA 


BATT 1? 

JMP 

TV 

Yes, Go Set Pointers 

TAD 

= 3000 

BATT 2, Set pointer To 

DGA 

12 

BATT Storage 

TA: TAD“ 

TS 

Get Type Indicator Again 

SPA 


Bit 0 Set 

JMP 

TB 

Yes, Go Type First Line 

AND 

=2000 

Mask AU But Bit 1 

SZA+CLA 


Second Line? 

JMP 

TO 

Yes . GO Tvoe Second Line 

“TYPE LINE 3 
TAD 

=06 ru 

Set pointer To Get Third 

DCA 

10 

Line Header 

JMS 

TD 

Go Tvoe Header Line 

CLA 

CALL 

0,\TTO 

Carr . Return/Line Feed 

TAD 

=1160 

Set Pointer For CHGR EFF 

TAD 

12 


DCA 

10 


GALL 

0,D3 

Go Get It 


G bi 





ZE 

ZA 

a,FOUT 

002U 

M4 

a.ci 

2,F0UT 

0020 

MC 

0,D3 

ZE 

ZA 

2 , FOOT 
0020 
MB 
0,D3 
2 , FOOT 
0020 


Go Test FoiV Zero 
Go Tbs t Fo r O v e r s i z e 
Corives'b And Type"!™ 


Get CHP.G TEMP 
ConverC And Type It 


Get REG EF F 
Go Tes t For Zer o 
Go Te s b Fo F ~Oven s 1 ze 
Convent And Type "it” 


Get RE G TEMP 
Convent And Type It 


s-12 

DO 

=0240 
0 , \TT0 
DD 
TL 
TT 
TO 
= -4 
10 

0020 
0,U1 
0 , U 1 
0,U1 
0 , U 1 

0,\TTO 

0, \CK 
TS 

1,2 . . 

TS 

11 

= -D13 
DD 
12 
1 1 
DD 
TM 

1 , CLOSE 
= 4 

0,WA 


Set Counten ’•DD" To -12 


Type A Space 
Last Space 
No, Go Again 
Go toB_Time (E.O.C.) 
Reset Pointer 


Load Zero 

Stone In Bank 2 E , 0 , C . Time 


Carriage Retunn/Line Feed 
Go Wait For TTY To Finish 
Get Type Pointer 
Deposit In 12 
Get Type Pointer 
Subtract l 
Deposit In 1 1 

Set Counter ''DD" To -8 

Get Type Indicator 
Shift Down One Address 
Last Shift? 

No , Do Again 
Turn TTY Off 

Go Wa it 




C b4 


JMP» 

TY 

Return 

» SET UP FOR 

BATTERY 1 


TV : TAD 

= 1000 

Set BAIT 1 Storage pointer 

DC A 

12 


JMP 

TA 

Continue Type Selection 

» SUBROUTINE 

TO TYPE HEADER LINE 

TD*. BSS 

1 

Return Address 

GALL 

0,\TT0 

Carriage Return/Line Feed 

TAD 

= *•1 Ob 

Set Counter "DD" To -43 

DGA 

DD 


TW: GALL 

0,D1 

Get Character Pair 

TAD 

0020 

Load Into Accum 

CALL 

0,\TT0 

Type 1st Part Of Pair 

ISZ 

DD 

Last Pair 

JMP 

TW 

No, Do Again 

CALL 

0,\CK 


NOP 



JMP« 

TD 

Return 

» TYPE LINE 

1 


TBI CL A 



CALL 

0,\TTO 

Carriage Return/Line Feed 

CALL 

0 , \TTO 

Carriage Return/Line Feed 

GALL 

0,\TT0 

Crarriage Return/Line Feed 

TAD 

=0400 

Set pointer To First Line Header 

DGA 

10 


JMS 

TD 

Go Type Header Line 

CL A 



GALL 

0,\TTO 

Carriage Return/Line Feed 

TAD 

=0240 

Type Space 

CALL 

OiNTTO 


TAD* 

TS 

Get Type Indicator And 

AND 

= 0003 

Mask For BATT No, 

TAD 

=0260 

Adjust Code 

CALL 

0,\TTO 

Type BATT No, 

TAD 

= 1103 

Set Pointer For Orbit Count 

TAD 

12 

1st Word 

DGA 

10 


CALL 

o;di 

Get It 

CALL 

2, TOUT 

Convert And Type 

PAR 

0020 


PAR’ 

M3 


CALL 

0,D1 

Get 2nd Word Of Orbit Count 

GALL 

2 , TOUT 

Convert And Type 

PAR 

0020 


PAR 

Ml 


JMS 

TT 

Go Type Time 

CALL 

0,D1 

DCH 

CALL 

2,I0UT 

Convert And Type 

PAR 

0020 


PAR 

M3 


CALL 

0,D3 

Go Get Data 


c bb 


GALL 

2, FOOT 

PAR 

0020 

PAR 

M9 

CALL 

0,D3 

JMS 

ZE 

JMS 

ZA 

CALL 

2, FOOT 

PAR 

0020 

PAR 

MS 

CALL 

0,D3 

CALL 

2, FOOT 

PAR 

0020 

PAR 

MA 

CALL 

0,D3 

CALL 

2 , FOOT 

PAR 

0020 

PAR 

MC 

JMP 

TR 

•TYPE LINE 2 
TC: CLA 

TAD 

=0b06 


Convet'fc And Type 


Get PPG EFF 
Go Test Fotv Zero 
Go Tes t Foi* ..^ vet ^size 
Con vert "And "fjTpe""^^ 


Get BAT TER Y TEMP 
Convert And "Type 


Get BPRC_WH 
Covert And Type 


Go Shift Type Indicators 


Set Pointer For Second 


DCA 

JMS 

CLA 

CALL 

TAD 

TAD 

DCA 

CALL 

CALL 

PAR 

PAR 

CALL 

JMS 

JMS 

CALL 

PAR 

PAR 

CALL 

JMS ‘ 

GALL 

PAR 

PAR 

GALL 

JMS 

JMS 

GALL 

PAR 

PAR 

CALL 


10 

TD 


0,\TTO 
= 11 2b 
12 
10 

0,Di 

2,F0UT 

0020 

Mb 

0,D3 

ZE 

ZA 

2,F0UT 

0020 

MS 

0,Di 

ZE 

2, FOOT 
0020 
M9 

0,Di 

ZE 

ZA 

2 » FOOT 
0020 
M7 

0,D3 


Line Header 

Go Type Header 

Carriage Return/Line Feed 
Set Points.' For BA TTERY AH O 


Go_^et_It 
Convert And Type 


Get R . F « 

Go Test~For Zero 
Go Tes t Fo r Over size 
Convert And Type 


Get BATTERY WHO 
Go Tes t Fo r Ze.ro 
Gonv er t And Type 


Get BATT ERY EFF 
Go,_Tes t F or Z e ro 
Go Test Fo r . O v e r s ize 
Convert And Type 


Get HI CELL VOLT 


JMS 

ZB 

Go Test „For Zero 

JMS 

ZA 

Go Tesr For Oversize 

CALL 

2 , FOUT 

Convert ~And Type 

PAR 

0020 

PAR 

MB 


CALL 

0,D1 

Gel HI CELL NO. 

CALL 

2, TOUT 

Convert And Type 

PAR 

0020 


PAR 

M3 


CALL 

0,D3 

Get AVE. CELL VOLT, 

JMS 

ZB 

Go Test For Zero 

CALL 

2, FOUT 

Convert /Tnd Type 

PAR 

0020 


PAR 

M7 


CALL 

0,D3 

Get LO CELL VOLT, 

JMS 

ZE 

Go Test For Zero 

JMS 

ZA 

Go Test For "Overs j ze 

CALL 

2, FOUT 

Convert And Type 

PAR 

0020 


PAR 

M7 


CALL 

0,D1 

Get LO CELL NO. 

CALL 

2,I0UT 

Convert And Type 

PAR 

0020 


PAR 

M3 


CALL 

0,D3 

Get AVE. CELL VOLT, 

JMS 

ZE 

Go Test For Zero 

CALL 

2, FOUT 

Convert 4nd Type 

PAR 

0020 

PAR 

M7 


JMP 

TR 

Go Shi ft Type Indicato 

•SUBROUTINE 

TO TYPE TIME 


TT : BSS 

1 

Return Address 

CALL 

0,D1 

Get 1st Word (Days) 

CALL 

2,I0UT 

Convert And Type 

PAR 

0020 

PAR 

M3 


TAD 

=272 

Type ( : ) 

CALL 

0,\TT0 


CALL 

0,D1 

Get 2nd Word (Hours) 

CALL 

2,I0UT 

0020 

Convert And Type 

PAR ‘ 


PAR 

Ml 


TAD 

= 272 

Type ( : ) 

CALL 

0,\TTO 


CALL 

0,D1 

Get 3rd Word (Minutes) 

CALL 

2,I0UT 

Convert And Type 

PAR 

0020 


PAR 

Ml 


TAD 

=272 

Type ( : ) 

CALL 

0,\TTO 


CALL, 

0,D1 

Get 4th Word (Seconds) 




if 


C bl 


I 


i 


CALL 

2.I0UT 

Convert And Type 

PAR 

0020 


PAR 

Ml 


JMP» 

TT 

Return 


* TEST FOR ZERO DATA 


: BSS 

1 

CLA 


TAD 

0020 

SZA+CLA 


JMP» 

ZE 

TAD 

= 20db 

DCA 

0020 

JMP» 

ZE 

TEST FOR DATA LIMIT 

BSS 

1 

CLA 


TAD 

0020 

AND 

= 3777 

CIA 


TAD 

=20 3b 

SMA+CLA 


JMP« 

ZA 

TAD 

= 20 3b 

DCA 

0020 

JMP“ 

ZA 




f* 
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APPENDIX D 

CHANNEL ASSIGNMSNIS (DDAS) 


TEST POSITION 1 


CHANNEL 

MEASUREMENT 



000 

Batte 

i'y 

Voltage 

001 

Mod • 

1 

Cell 

1 

Volt, 

002 

Mod. 

1 

Cell 

2 

Volt . 

003 

Mod . 

1 

Cell 

3 

volt , 

004 

Mod, 

1 

Cell 

4 

Volt. 

00b 

Mod . 

1 

Cell 

b 

Volt . 

006 

Mod , 

1 

Cell 

6 

Volt , 

007 

Mod , 

1 

Cell 

7 

Volt. 

008 

Mod. 

1 

Cell 

3 

Volt 

009 

Mod . 

1 

Cell 

9 

Volt, 

010 

Mod, 

1 

Cell 

10 

Volt , 

Oil 

Mod, 

1 

Cell 

11 

Volt. 

012 

Mod . 

1 

Cell 

12 

Volt . 

013 

Mod , 

1 

Cell 

13 

Volt. 

014 

Mod. 

1 

Cell 

14 

Volt. 

01b 

Mod, 

1 

Cell 

1b 

Volt. 

016 

Mod, 

1 

Cell 

16 

Volt, 

017 

Mod , 

1 

Cell 

17 

Volt. 

018 

Mod . 

1 

Cell 

18 

Volt. 

019 

Mod , 

1 

Cell 

19 

Volt , 

020 

Mod . 

1 

Cell 

20 

Volt , 

021 

Mod . 

1 

Cell 

21 

Volt . 

022 

Mod , 

1 

Cell 

22 

Volt. 

023 

Mod , 

1 

Cell 

23 

Volt. 

024 

Mod , 

1 

Cell 

24 

Volt. 

02b 

Mod. 

1 

Cell 

2b 

Volt . 

026 

Mod, 

1 

Cell 

26 

Volt. 

027 

Mod, 

1 

Cell 

27 

Volt . 

028 

Mod . 

1 

Cell 

28 

Volt , 

029 

Mod , 

2 

Cell 

1 

Volt . 

030 

Mod , 

2 

Cell 

2 

Volt. 

031 

Mod . 

2 

Cell 

3 

Volt. 

032 

Mod, 

2 

Cell 

4 

Volt. 

033 

Mod . 

2 

Cell 

b 

Volt. 

034 

Mod . 

2 

Cell 

6 

Volt. 

03b 

Mod , 

2 

Cell 

7 

Volt, 

03b 

Mod. 

2 

Cell 

8 

Volt , 

037 

Mod , 

2 

Cell 

9 

Volt. 

038 

Mod. 

2 

Cell 

10 

Volt, 

039 

Mod. 

2 

Ceil 

1 1 

volt. 

040 

Mod, 

2 

Cell 

12 

Volt . 

041 

Mod, 

2 

Cell 

13 

Volt. 

042 

Mod . 

2 

Cell 

14 

Volt , 

043 

Mod . 

2 

Cell 

1b 

Volt. 

044 

Mod . 

2 

Cell 

16 

Volt . 


D ‘ 1 









QUb 

Mod , 

2 

Cell 

17 

Volt, 

046 

Mod. 

2 

Cell 

18 

Volt. 

OH 7 

Mod, 

2 

Cell 

19 

Volt . 

04 a 

Mod , 

2 

Cell 

20 

Volt. 

049 

Mod, 

2 

Cell 

21 

Volt . 

oao 

Mod , 

2 

Cell 

22 

Volt. 

0b1 

Mod , 

2 

Cell 

23 

Volt. 

Ob 2 

Mod, 

2 

Cell 

24 

Volt . 

ObS 

Mod , 

2 

C 0 XI 

2b 

Volt. 

Ob 4 

Mod, 

2 

Cell 

26 

Volt. 

Obb 

Mod, 

2 

Cell 

27 

Volt . 

Ob 6 

Mod . 

2 

Cell 

28 

Volt , 

Ob 7 

Mod > 

3 

Cell 

1 

volt. 

Ob a 

Mod, 

3 

Cell 

2 

Volt , 

Ob9 

Mod . 

3 

Cell 

3 

Volt. 

060 

Mod, 

3 

Cell 

4 

Volt. 

061 

Mod, 

3 

Cell 

b 

Volt. 

062 

Mod , 

3 

Cell 

6 

Volt , 

063 

Mod . 

3 

Cell 

7 

Volt. 

064 

Mod, 

3 

Cell 

8 

Volt, 

06b 

Mod , 

3 

Cell 

9 

Volt. 

Ob6 

Mod , 

3 

Cell 

10 

Volt, 

067 

Mod , 

3 

Cell 

11 

Volt . 

068 

Mod, 

3 

Cell 

12 

Volt . 

069 

Mod . 

3 

Cell 

13 

Volt . 

070 

Mod, 

3 

Cell 

14 

Volt , 

071 

Mod , 

3 

cell 

1b 

volt , 

072 

Mod , 

3 

Cell 

16 

Volt , 

073 

Mod . 

3 

Cell 

17 

Volt. 

074 

Mod. 

3 

Cell 

18 

Volt . 

07b 

Mod, 

3 

Cell 

19 

Volt. 

076 

Mod , 

3 

Cell 

20 

Volt. 

077 

Mod. 

3 

Cell 

21 

Volt . 

078 

Mod , 

3 

Cell 

22 

volt. 

079 

Mod . 

3 

Cell 

23 

Volt, 

080 

Mod. 

3 

Cell 

24 

Volt . 

08 1 

Mod . 

3 

Cell 

2b 

Volt , 

082 

Mod , 

3 

Cell 

26 

Volt . 

083 

Mod , 

3 

Cell 

27 

Volt . 

084 

Mod , 

3 

Cell 

28 

Volt . 

08b 

Mod , 

4 

Cell 

1 

Volt , 

086 

Mod, 

4 

Cell 

2 

Volt . 

087 

Mod , 

4 

Cell 

3 

Volt , 

088 

Mod , 

4 

Cell 

4 

Volt. 

089 

Mod, 

4 

Cell 

b 

Volt . 

090 

Mod . 

4 

Cell 

6 

Volt . 

091 . 

Mod, 

4 

Cell 

7 

Volt , 

092 

Mod , 

4 

Cell 

8 

Volt. 

093 

Mod . 

4 

Cell 

9 

Volt , 

094 

Mod . 

4 

Cell 

10 

Volt. 

09 b 

Mod . 

4 

Cell 

11 

Volt , 




096 

Mod, 4 CoXl 

12 

Volt , 

097 

Mod, 4 CoU 

13 

Volt, 

098 

Mod , 4 Cell 

14 

Volt. 

099 

Mod . 4 Cell 

lb 

Volt, 

100 

Mod, 4 Cell 

16 

Volt . 

101 

Mod. « Cell 

17 

Volt, 

102 

Mod , 4 Cell 

18 

Volt, 

loa 

Mod. 4 Cell 

19 

Volt. 

104 

Mod, 4 Cell 

20 

Volt. 

10!? 

Mod, 4 Cell 

21 

Volt , 

106 

Mod, 4 Cell 

22 

Volt. 

107 

Mod , 4 Cell 

23 

Volt , 

108 

Mod, 4 Cell 

24 

Volt, 

109 

Mod, 4 Cell 

2b 

Volt , 

110 

Mod , 4 Cell 

2b 

Volt, 

Ml 

Mod, 4 Cell 

27 

Volt , 

112 

Mod, 4 Cell 

28 

Volt, 

113 

Not Used 



114 

Not Used 



11b 

Not Used 



116 

Not Used 



117 

Not Used 



118 

Not Used 



119 

Not Used 



120 

Not Used 



121 

Not Used 



122 

Not Used 



123 

Not Used 



124 

Not Used 



12b 

Not Used 



126 

Not Used 



127 

Not Uf id 



128 

Not Used 



129 

Not Used 



130 

Not Used 



131 

Not Used 



1 32 

Not Used 



133 

Not Used 



134 

Not Used 



13b 

Mod, 1 Mod. 

Volt, 

13t> 

Mod, 2 Mod, 

Volt, 

137 

Mod , 3 Mod . 

Volt, 

138 

Mod, 3 Mod, 

Volt, 

139 

Mod , b Mod , 

Volt, 

140 

Not Used 



141 

Mod, 1 Temp 

. 1 


142. 

Mod, 1 Temp 

, 2 


143 

Mod . 1 Temp 

. 3 


144 

Mod, 1 Temp 

, 4 


14b 

Mod, 1 Temp 

. b 


146 

Mod. 2 Temp 

, 1 



D i 





Mod, 2 Temp, 

2 

VU8 

Mod, 2 Temp, 
Mod, 2 Temp, 

3 

1«9 

4 

IbO 

Mod, 2 Temp, 

b 

1b1 

Mod , 3 Temp , 

1 

1b2 

Mod, 3 Temp, 

2 

Ibi 

Mod, j Temp. 

3 

lb*< 

Mod. 3 Temp, 

4 

Ibb 

Mod . 3 Temp , 

b 

1b6 

Mod. W Temp. 

1 

lb7 

Mod , 4 Temp . 

2 

lb8 

Mod, 4 Temp, 

3 

1b9 

Mod. 4 Temp, 

4 

160 

Mod, 4 Temp, 

b 

161 

Not Used 


162 

Nob Used 


16i 

Nob Used 


16il 

Nob Used 


16b 

Nob Used 


166 

Chamber Temp 

. 1 

167 

Chamber Temp 

* 2 

168 

Chamber Temp 

, 3 

169 

Chamber Temp 

, 4 

170 

Room Temp 


171 

Babterv 1 Fault 

172 

Nob Used 


173 

Nob Used 


17^1 

Nob Used 


17b 

Nob Used 


176 

Not Used 


177 

Nob Used 


178 

I Reg In 


179 

I Reg Out 


180 

V Reg Out 


181 

V Bus 


182 

I 0PRC 


183 

I BATT, 


18ii 

I SAS 


I8b 

V SAS 


186 

1 Ghrg, Oub 


187 

Chrgr, Temp. 


188 

Reg Temp, 


189 

Battery Temp 


190 

Nob Used 


191 

Nob Used 


192 

BAIT Disc, 


193. 

Night Comp, 


194 

Orbit Comp, 


19b 

Cap Test 


196 

BPRC bim. 


197 

Recond , 




CHANNEL ASSIGNMENT (DDAS) 
TEST POSITION 2 


CHANNEL 

200 

MEASUREMENT 
Batfcei’y Voltage 

201 

Mod, 

1 

Cell 

1 Volt, 

‘202 

Mod , 

1 

Cell 

2 Volt, 

203 

Mod , 

1 

Cell 

3 Volt. 

204 

Mod. 

1 

Ceil 

4 Volt, 

20b 

Mod , 

1 

Cell 

b Volt. 

206 

Mod . 

1 

Cell 

6 Volt, 

207 

Mod, 

1 

Cell 

7 Volt. 

209 

Mod , 

1 

Cell 

8 Volt. 

209 

Mod, 

1 

Cell 

9 Volt, 

210 

Mod , 

1 

Cell 

10 Volt, 

211 

Mod , 

1 

Cell 

11 Volt. 

212 

Mod , 

1 

Cell 

12 Volt. 

213 

Mod. 

1 

Cell 

13 volt, 

214 

Mod , 

1 

Cell 

14 Vo: ., 

21b 

Mod , 

1 

Cell 

1b Volt. 

216 

Mod. 

1 

Cell 

16 Volt. 

217 

Mod , 

1 

Cell 

17 Volt. 

216 

Mod , 

1 

Cell 

18 Volt. 

219 

Mod , 

1 

Cell 

19 volt. 

220 

Mod . 

1 

Cell 

20 Volt, 

221 

Mod . 

1 

Cell 

21 Volt. 

222 

Mod , 

1 

Cell 

22 Volt. 

223 

Mod, 

2 

Cell 

1 Volt. 

224 

Mod, 

2 

Cell 

2 Volt. 

22b 

Mod. 

2 

Cell 

3 Volt. 

226 

Mod , 

2 

Cell 

4 Volt, 

227 

Mod , 

2 

Cell 

b Volt. 

228 

Mod , 

2 

Cell 

6 Volt . 

229 

Mod, 

2 

Cell 

6 Volt. 

230 

Mod , 

2 

Cell 

8 Volt, 

231 

Mod, 

2 

Cell 

9 Volt , 

232 

Mod, 

2 

Cell 

10 Volt. 

233 

Mod , 

2 

Cell 

11 Volt. 

234 

Mod. 

2 

Cell 

12 Volt. 

23 b 

Mod . 

2 

Cell 

13 Volt. 

236 

Mod . 

2 

Cell 

14 Volt, 

237 

Mod . 

2 

Cell 

1b Volt , 

238 

Mod , 

2 

Cell 

16 Volt. 

239 

Mod, 

2 

Cell 

17 Volt , 

240 

Mod , 

2 

Cell 

18 Volt . 

24 1 . 

Mod , 

2 

Cell 

19 Volt 

242 

Mod. 

2 

Cell 

20 Volt. 

243 

Mod . 

2 

Cell 

21 Volt. 

244 

Mod . 

2 

Cell 

22 Volt, 

24b 

Mod, 

3 

Cell 

1 Volt . 


D 


6 




246 

Mod. 3 

GeU 

2 VoXb, 

247 

Mod . 3 

Co XX 

3 Volt, 

248 

Mod . 3 

CeXX 

4 Volt* 

249 

Mod . 3 

Co XX 

4 Volt, 

2bO 

Mod . 3 

Go XX 

6 Volt. 

2b 1 

Mod. 3 

Co XX 

7 Volt, 

2b2 

Mod. 3 

CeXl 

7 Volt. 

2b 3 

Mod, 3 

CoXX 

9 Volt, 

2b4 

Mod* 3 

Co XX 

10 Volt, 

2bb 

Mod. 3 

CoXX 

11 Volt, 

2b6 

Mod. 3 

CeXl 

12 Volt, 

2b7 

Mod, 3 

Cell 

13 Volt, 

2b 8 

Mod , 3 

CoXX 

14 Volt. 

2b9 

Mod . 3 

GoXX 

1b Volt, 

260 

Mod, 3 

CoXX 

16 Volt. 

261 

Mod, 3 

CoXX 

17 Volt, 

262 

Mod. 3 

Coll 

18 Volt, 

263 

Mod, 3 

CoXX 

17 Volt, 

264 

Mod. 3 

Coll 

20 Volt. 

26b 

Mod, 3 

CoXX 

21 Volt, 

266 

Mod . 3 

Coll 

22 Volt. 

267 

Mod, 4 

Coll 

1 Volt, 

268 

Mod. 4 

Coll 

2 Volt. 

269 

Mod . 4 

CeXl 

3 Volt. 

270 

Mod. 4 

Coll 

4 Volt. 

271 

Mod , 4 

CoXX 

b Volt, 

272 

Mod, 4 

Cell 

6 Volt. 

273 

Mod , 4 

Cell 

7 Volt. 

274 

Mod, 4 

Cell 

8 Volt, 

27b 

Mod, 4 

Coll 

9 Volt, 

276 

Mod, 4 

Cell 

10 Volt, 

277 

Mod , 4 

CoXX 

11 Volt. 

278 

Mod , 4 

Coll 

12 Volt, 

279 

Mod , 4 

Co X X 

13 Volt, 

280 

Mod. 4 

Cell 

14 Volt, 

281 

Mod, 4 

Cell 

1b Volt, 

282 

Mod, 4 

CeXl 

16 Volt, 

283 

Mod, 4 

Coll 

17 Volt . 

284 

Mod , •4 

CeXl 

18 Volt. 

28b 

Mod, 4 

Cell 

19 Volt, 

286 

Mod, 4 

GeXl 

20 Volt, 

287 

Mod, 4 

Go 11 

21 Volt, 

288 

Mod , 4 

Cell 

22 Volt . 

289 

Mod, b 

Cell 

1 Volt. 

290 

Mod , b 

Cell 

2 Volt, 

291 

Mod, b 

GeXl 

3 Volt. 

292 • 

Mod, b 

Cell 

4 Volt. 

293 

Mod* b 

Cell 

b Volt, 

294 

Mod. b 

Cell 

6 volt. 

29 b 

Mod , b 

GeXl 

7 Volt. 

296 

Mod , b 

CeXX 

8 Volt , 


297 

298 

299 

300 

301 

302 
303 
30 M 
30b 
306 

307 

308 

309 

310 

311 

312 

313 

314 
31b 
31b 

317 

318 

319 

320 

321 

322 

323 

324 
32b 
326 

327 

328 

329 

330 

331 

332 

333 

334 
33b 

336 

337 

338 

339 

340 

341 

342 

343 • 

344 

34 b 

346 

347 


Mod, b 

Cell 

9 ’ 

Volt . 

Mod , b 

Cell 

10 

Volt . 

Mod , b 

Cell 

11 

Volt . 

Mod , b 

Cell 

12 

Volt. 

Mod , b 

Cell 

13 

Volt , 

Mod , b 

Ceil 

14 

Volt, 

Mod . b 

Cell 

1b 

Volt. 

Mod , b 

Cell 

16 

Volt, 

Mod , b 

Cell 

17 

Volt. 

Mod, b 

Cell 

18 

Volt. 

Mod , b 

Cell 

19 

Volt . 

Mod , b 

Cell 

20 

Volt. 

Mod , b 

Cell 

21 

Volt . 

Mod , b 

Cell 

22 

Volt . 


Not Used 
Not Used 
Not Used 
Not Used 
Not, Used 
Not Used 
Not Used 
Not Used 
Not Used 
Not Used 
Not Used 
Not Used 
Not Used 
Not Used 
Not Used 
Not Used 
Not Used 
Not Used 
Not Used 
Not Used 
Not Used 
Not Used 
Not Used 
Not Used 

Mod. 1 Mod, VoXt. 
Mod, 2 Mod, Volt. 
Mod, 3 Mod, Volt. 
Mod, 4 Mod, Volt, 
Mod. b Mod. Volt. 
Not Used 
Mod , 1 Temp, 1 
Mod, 1 Temp, 2 
Mod . 1 Temp , 3 
Mod, 1 Temp, 4 
Mod, 1 Temp, b 
Mod. 2 Temp, 

Mod. 2 Temp. 
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BATTWHO— * ABB. . M6l700*03. 

BAIT AHQ ^ 088. *32855B*03. 

CHAN NO. 035, >B00532+00. 

p, t, r. 

ORBIT NO._* 00837, *. 31. 42. i ♦/- SS) 


T, 0. T. 

ODD. HH. NW. SS 



043, 23. 50. iB. 


BATT NO. 


P'1 CURE 3 


CHAN NO, 


r 


SEE APPENDIX D 
FOR MEAS. DEFINITION 



i86. •‘2B2B68‘01, 

i85. . »542B68*01. 
184. . ••401367*01. 
183, >4BBB02+02. 
i82. '•634765*02. 

i81. •000000*00. 

180. *1B53 12*01. 
17B, '•146484*01. 

178. . *-68847e*00 
000. *149000*03. 
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